информатика
Найти все двузначные числа сумма цифр которых равна 7)и составить программу по min и по max)помогите пож.
Оставить ответОтвет №1
Var min, max, x: byte;
begin
max=0;
min:=100;
for x:= 10 to 99 do begin
if (x mod 10)+(x div 10)=7 then begin
writeln (x);
if x>max then max:=x;
if x
Знаете ответ?