Прочитать с экрана 8 целых чисел и из большего вычесть - вопрос №664092085 от hehehdhd 31.05.2022 18:39

Question

Информатика: Прочитать с экрана 8 целых чисел и из большего вычесть 5. результат напечатать. (замечание: использовать в программе не более 3 переменных) (на паскале)

hehehdhd · Answer

Var a,b,c:integer;readln(a);for c:=1 to 7 dobegin readln(b);if(b a)a:=b;end;b:=a-5;writeln(b);end....