ДС
Денис Савельев

пишет ожидалась точка после первого end, почему?

program zaaz;
var
a:array [1..100,1..100]of integer;
i,j,n,m,max,min:integer;
begin
readln(n,m);
for i:=1 to m do
for j:=1 to n do
writeln('vvedite chislo n');
writeln('vvedite chislo m')
end;
readln(a[i,j]);
min:= a[i,j]);
max:= a[i,j)];
begin
if (n,m)> max then max:= a[i,j];
if (n,m)< min then min:= a[i,j];
end;
end;
writeln('max=' max)
writeln('min=' min)
end.

в чём же ошибка Жаслан?

Дмитрий Малюков
Дмитрий Малюков

Надо добавить оператор begin перед end или убрать несколько лишних end,
чтобы число begin было равно количеству end
Могу заметить, что программа неправильна

Евгений
Евгений

потому что весь код должен быть внутри begin end.(с точкой на конце) , а у тебя получается что открывающийся беги закрывается на 11 строке. Нафига тебе вообще столько бегин-ендов? Сделай все в одном

Похожие вопросы
что здесь не так? пишет ошибка ожидался идентификатор
Правильный IF в хранимой процедуре, в моем варианте после END IF; и end пишет ошибку
ожидался идентефикатор пишет . уже не знаю что делать. где ошибка?
в чем ошибка? пишет "end if without block if" , хотя блок if есть! (Visual basic)
Не распознает косинус пишет ожидалась функция
Front-end и Back-end?
пишет ожидался идентификатор в строчке с первым begin. нужно сделать модуль
Паскаль выдаёт ошибку: Встречено 'end', а ожидалось выражение
Не пойму в чем ошибка, пишет: "Expected END but VAR found "
Почему он мне не пишет первый ?