Составьте программу которая заполняет массив b 1..8 случайными целыми числами в диапазоне от 1 до 10 затем изменяет знак элементов с чётными индексами на противоположный. выведите на экран исходный и полученный массивы.
286
327
Ответы на вопрос:
Var i: integer; begin; writeln('array: '); var ar: =arrrandominteger(9,1,10); for i: =1 to 8 do begin; write(ar[i]: 4); if i mod 2=0 then ar[i]: =ar[i]*(-1); end; writeln; writeln('final array: '); for i: =1 to 8 do write(ar[i]: 4); end.
Популярно: Информатика
-
alicea0710.12.2021 21:38
-
denasty04.09.2022 16:32
-
SadDorry24.02.2021 18:36
-
valeroon1623.11.2020 19:51
-
svetika081320.02.2022 04:33
-
Tvoy1Batya13.05.2021 17:10
-
24707404.11.2021 03:00
-
ledytyt1306.01.2020 02:19
-
belover01.04.2022 21:42
-
serenovanuria0320.01.2023 11:54