Ответы на вопрос:
Const n=50; var b: array[1..n] of integer; i: byte; x: integer; begin x: =1; for i: 1 to n do begin b[i]: =x; x: =x+3; end; end.
Популярно: Информатика
-
малышка13508.02.2021 16:34
-
DiaGirlNya24.02.2020 17:38
-
elimasataeva31.05.2023 05:41
-
BratanTVision21.01.2022 17:09
-
ekaterinaf7906.05.2023 21:40
-
Anastik22217.04.2021 08:51
-
Doneore16.05.2023 18:21
-
батуми113.05.2023 18:04
-
vlad6712322222.06.2023 05:14
-
Мэйбл12345678925.07.2022 16:19