Представлена программа, написанная на языке 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.
276
461
Ответы на вопрос:
Популярно: Информатика
-
10RAM1020.12.2021 22:19
-
AnzhelaBagdasaryan06.01.2022 02:55
-
vladpin0116.07.2021 22:37
-
Dmitry023214106.09.2020 23:56
-
ilona12208.06.2021 12:01
-
katyasha050422.01.2023 17:59
-
Лисёнка200504.04.2020 08:24
-
Genius202026.03.2023 17:02
-
nikzarubenko29.11.2022 05:35
-
Лизокккккек25.12.2021 02:18