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

tkstkn tkstkn    3   15.08.2019 07:20    0

Ответы
11nastyaaaaa11 11nastyaaaaa11  08.09.2020 14:58
Var a,b,c:integer;
readln(a);
for c:=1 to 7 do
begin
readln(b);
if(b>a)
a:=b;
end;
b:=a-5;
writeln(b);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика