Дана последовательность целых чисел a1, a2, an. составьте программу, которая выводит разность произведения элементов с нечётным индексом и суммы элементов с чётным индексом.
255
404
Ответы на вопрос:
Program gt; var a: array[1..1000]of integer; n,r,p,s,i: integer; begin read(n); p: =1; s: =0; for i: =1 to n do begin read(a[i]); if(i mod 2=1)then p: =p*a[i] else s: =s+a[i]; end; r: =p-s; writeln(r); end.
Популярно: Информатика
-
SheriStriff28.02.2023 16:49
-
KopiYT29.04.2022 20:56
-
Znatokiys26.02.2021 19:44
-
ттсссс18.04.2023 09:30
-
anjellalove09407.05.2022 19:28
-
Andezia23.09.2021 20:48
-
Елизавета104006.02.2021 23:47
-
SashaZorikhina22.06.2023 06:37
-
технолигия20.03.2020 02:46
-
ViktorrriaQueen16.06.2022 15:12