Страница 163 §3.5 номер 8, ГДЗ по информатике за 8 класс к учебнику Босовой
Информатика 8 класс 8класс
ГДЗ к учебнику по информатике за 8 класс Босовой. Решения к номерам
Ответ и решение
program z8;var x, max: integer;begin readln(x); max := x; repeat readln(x); if (max < x) and (x <> 0) then max := x; until x = 0; writeln('max = ', max)end.