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

Question

Информатика

Горислава

28 февраля, 01:58

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

+1

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