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

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

Question

Информатика

Аннуся

24 июня, 17:29

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

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

+2

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