Ответы на вопрос:
на каком языке нужна программа? пример на paskal: program zadacha; var massiv: array [1..15] of integer; i: byte; massiv2: array [1..15] of real; begin randomize; write('isxodnij massiv: '); for i: =1 to 15 do begin massiv: =random(41)-20; write(massiv,' '); end; writeln; writeln('massiv posle preobrazovanij: '); for i: =1 to 15 do begin if massiv=0 then massiv2: =massiv else if massiv mod 5 = 0 then massiv2: =massiv*2 else begin massiv2: =massiv; massiv2: =massiv2/2; end; write(massiv2: 0: 1,' '); end; readln; end.
Популярно: Информатика
-
Govnoegc22.08.2021 17:15
-
yuliyasecheva13.04.2021 20:21
-
superogurec00207.11.2021 21:44
-
goplanozvgqa23.06.2022 23:31
-
ostapbelyaev15.05.2020 07:42
-
Умник00Семь25.03.2023 22:00
-
Коsмoc14.09.2021 01:12
-
tearprincess20022513.05.2023 03:10
-
натали57716.11.2021 09:19
-
AndreyAryasov15.04.2022 22:57