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

Question

Валюня

8 октября, 09:30

+5

Ответы (1)

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

Сусанна · Answer 1

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.