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

Question

Информатика

Викторка

19 августа, 11:33

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

+5

Ответы (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.