НАЙДИТЕ ОШИБКУ В ПРОГРАММЕ! program i1; var a, b: integer; begin a:=10; b:=1; begin while a меньше =50 do 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. Что значит "Встречено...
НАЙДИТЕ ОШИБКУ В ПРОГРАММЕ!
program i1;
var a, b: integer;
begin
a:=10;
b:=1;
begin
while a<=50 do
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 строке"?
Гость
Ответ(ы) на вопрос:
ГостьОшибка означает несоответствие begin и end. Исправить можно, например, так:
program i1;
var a, b: integer;
begin
a:=10;
b:=1;
while a<=50 do
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.
Не нашли ответ?
Похожие вопросы