Есть ответ 👍

Опиши последовательность построение дома ​

135
218
Посмотреть ответы 1

Ответы на вопрос:


Var a: array [1..15] of integer; i, s: integer; begin       for i : = 1 to 15 do           read(a[i]);       s : = 0;       for i : = 1 to 15 do       if i mod 2 = 0 then         s : = s + a[i];       writeln(s); end.

Популярно: Информатика