Есть ответ 👍

Реши методом вычислений (!).

164
251
Посмотреть ответы 1

Ответы на вопрос:


Ошибка означает несоответствие 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.

Популярно: Информатика