Ответы на вопрос:
var i, n, s: integer; begin readln(n); for i : = 1 to n do begin if(i mod 2 = 0) then s : = s + sqr(i); end; writeln(s); end.
Популярно: Информатика
-
Счего связываются устройства компьютера?...
хагагпррр26.02.2023 07:31 -
Определите информационный размер текстового документа если он записан с 4-символьного...
Romaglot10.02.2023 01:25 -
Какова года или века был создан первый телевизор?...
простонастя415.02.2023 08:10 -
Перевести числа 200, 489, 543, 950, 1025 из 10сс в двоичную любым удобным способом,...
MilenaSmail1210.09.2021 14:24 -
Встановіть відповідність між числовими значеннями та кольорами атрибутів керування...
maksymmakarec06.04.2021 23:04 -
Для підготовки презентації проекту з фізики у вигляді публікації або постера «Вода...
zzzzzzya201705.12.2020 08:54 -
Составить таблицу 16-ти системы счисления...
Криш777114.05.2022 22:46 -
Внекотором каталоге находиться файл дневник.txt. после того, как в этом каталоге...
MrMike107.05.2021 07:41 -
Снавните оперативную и долговременную память, ответив на вопросы: – Когда данные...
FvitalikA19.07.2021 05:03 -
Известно, что AC = BD. Докажите, что AD║BC....
bondarsvetlana2525.09.2022 10:54