Вопрос, который вызвал трудности

НАЙДИТЕ ОШИБКУ В ПРОГРАММЕ!
program i1;
var a, b: integer;
begin
a:=10;
b:=1;
begin
while a<=50 do<br> begin
if (a mod 9 = 0) or (a mod 7 = 0) then
begin
b:=b*a;
write (b);
end;
a:=a+1;
write (b);
End.

Что значит "Встречено ., а ожидалось ; в 16 строке"?

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Ошибка означает несоответствие begin и end. Исправить можно, например, так:
program i1;
var a, b: integer;
begin
a:=10;
b:=1;
while a<=50 do<br>begin
 if (a mod 9 = 0) or (a mod 7 = 0) then
 begin
 b:=b*a;
 write (b);
 end;
 a:=a+1;
end;
write (b);
End.