Написать программу с помощью цикла for. Из чисел от 10 до 99 вывести те, сумма которых равна N. N-вводится с клавиатуры. Паскаль.

Question

Аглаида

19 июня, 16:56

+2

Ответы (1)

Знаете ответ на вопрос?

Урбана · Answer 1

Var

i, n: integer;

begin

readln (n) ;

for i : = 10 to 99 do

if (i mod 10 + i div 10 = n) then

writeln (i) ;

end.