Паскаль АБС найти количество 3-х значных чисел, сумма цифр которых=15

Question

Информатика

Алиска

14 сентября, 08:49

Паскаль АБС найти количество 3-х значных чисел, сумма цифр которых=15

+3

Ответы (1)

Знаешь ответ?

Александрина · Answer 1

Program gt;

var a, b, c, k:integer;

begin

k:=0;

for a:=1 to 9 do

for b:=0 to 9 do

for c:=0 to 9 do

if (+b+c=15) then k:=k+1;

writeln (k);

end.