Вывести на экран все двузначные числа, сумма цифр которых равна заданному числу n.

Написать программу в паскаль abc

Question

Информатика

Алексюша

16 июня, 07:02

Вывести на экран все двузначные числа, сумма цифр которых равна заданному числу n.

Написать программу в паскаль abc

+4

Ответы (1)

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

Валеша · Answer 1

Var

i, j:0 ... 9;

n: integer;

begin

readln (n) ;

for i:=1 to 9 do

for j:=0 to 9 do

if i+j=n then writeln (i*10+j)

end.

6

15

24

33

42

51

60

Вывести на экран все двузначные числа, сумма цифр которых равна заданному числу n.Написать программу в паскаль abc

Вывести на экран все двузначные числа, сумма цифр которых равна заданному числу n.

Написать программу в паскаль abc