Program n_66
var x, max:real; i: integer;
begin
writeln ('Введите число')
readln (max)
for i:=1 to 9 do begi
writeln (x)
if x>max then max:=
en
writeln ('максимум -', max')
end.Встречено 'writeln' а ожидалось ';'
Program n_66
var x, max:real; i: integer;
begin
writeln ('Введите число')
readln (max)
for i:=1 to 9 do begi
writeln (x)
if x>max then max:=
en
writeln ('максимум -', max')
end.Встречено 'writeln' а ожидалось ';'
var x, max:real; i: integer;
begin
writeln ('Введите число')
readln (max)
for i:=1 to 9 do begi
writeln (x)
if x>max then max:=
en
writeln ('максимум -', max')
end.Встречено 'writeln' а ожидалось ';'
Не можешь разобраться в этой теме?
Обратись за помощью к экспертам
Гарантированные бесплатные доработки
Быстрое выполнение от 2 часов
Проверка работы на плагиат
Интересные статьи из справочника
Поможем написать учебную работу
Отвечай на вопросы, зарабатывай баллы и трать их на призы.
Подробнее
Подробнее
Программа содержит ошибку синтаксиса. Необходимо заменить символ '>' на символ '>'. Вот исправленный вариант программы:
Program n_66
va
x, max: real
i: integer
begi
writeln('Введите число')
readln(max)
for i := 1 to 9 d
begi
writeln(x)
if x > max the
max:= x
end
writeln('максимум -', max)
end.