
Conjurus
7 год назад
Составьте программу которая выводит на экран все двухзначные числа сумма цифр которых равна 7
ОТВЕТЫ

Эразмович
Jul 10, 2019
Program n_1;
var i,a:integer;
begin
for i := 10 to 99 do begin
a := i mod 10 + i div 10;
if a = 7 then
writeln(i);
end
end.
var i,a:integer;
begin
for i := 10 to 99 do begin
a := i mod 10 + i div 10;
if a = 7 then
writeln(i);
end
end.
139
Смежные вопросы: