Ответы на вопрос:
Var a: array [1..7] of real; i: integer; begin write ('массив: '); for i: =1 to 7 do begin a[i]: =random(201)-100; write (a[i],' '); end; writeln; write ('массив * 2: '); for i: =1 to 7 do begin a[i]: =a[i]*2; write (a[i],' '); end; end.
Популярно: Информатика
-
emilking29.05.2023 11:29
-
AnzhelaBagdasaryan10.01.2023 01:56
-
dkcmvmcmf29.08.2021 04:57
-
svetikkomi09.04.2021 02:29
-
zoobbicom10.09.2020 04:05
-
maxtrimfxus27.12.2022 18:09
-
natapova1206.03.2021 20:22
-
ViktorNiktophorov19.09.2021 07:11
-
Nastya001200521.08.2020 10:52
-
timurgu0816.07.2022 12:35