Найти все двузначные числа сумма цифр которых равна 7)и составить программу по min и по max)помогите пож.
Var min, max, x: byte;beginmax=0;min:=100;for x:= 10 to 99 do beginif (x mod 10)+(x div 10)=7 then beginwriteln (x);if x>max then max:=x;if x
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
