Представлена программа, написанная наязыке PascalABC. Выполнитевсе операции и найдите,

Представлена программка, написанная на языке PascalABC. Сделайте все операции и найдите, какой ответ выведется на экран.1) program s;2) var a: Array [1..10] of integer;3) i, p: integer;4) begin5) for i:=1 to 10 do 6) a[i]:=i+1;7) p:= 1;8) for i:=1 to 10 do9) if a[i] mod 3=0 then10) p:=p * a[i];11) writeln(p);12) end.

Задать свой вопрос
1 ответ
Ответ число 162 =) просто запустите
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт