Паскаль. Составить программу, в которой среди двузначных чисел печатаются те числа, которые равны сумме своих цифр, используя цикл с параметром (счетчиком).

Question

Информатика

Надена

8 июля, 07:22

Паскаль. Составить программу, в которой среди двузначных чисел печатаются те числа, которые равны сумме своих цифр, используя цикл с параметром (счетчиком).

+4

Ответы (1)

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

Максюта · Answer 1

Program z;

var i:integer;

begin

for i:=10 to 99 do

begin

if i = ((i mod 10) + (i div 10)) then writeln (i) ;

end;

end.

Я прогнал программу, таких чисел нет среди двузначных