Составьте программу вычисления суммы четных элементов одномерного массива.решить в паскале
189
422
Ответы на вопрос:
const n=4; var a: array [1..n] of integer; s,t: integer; begin randomize; for t: =1 to n do begin a[t] : = random(100); write(a[t]: 6); end; writeln; s: =0; for t: =1 to n do if a[t] mod 2=0 then s: =s+a[t]; writeln('summa=',s); end.
Shared (расшаренная), общая, синхронизированная, сетевая - тысячи эпитетов
Популярно: Информатика
-
kulvera7501.01.2021 08:36
-
ksyxa9201.10.2020 05:50
-
Ali8the8Emperor16.10.2020 06:16
-
Владrar17.03.2023 01:11
-
gasuslov08.11.2022 13:13
-
Damirok2130.06.2023 13:59
-
Polin1Zayxh27.07.2022 06:18
-
Алёнка1208200422.06.2023 11:47
-
stepatimoshkov8Dimas31.12.2021 09:07
-
ROMA70628.12.2022 22:10