Ответы на вопрос:
Var n,i,sum: integer; begin read(n); for i: =1 to n do begin if (i mod 2=0) then sum: =sum+i; end; writeln(sum); end.
Популярно: Информатика
-
Для 10-11 класса help...
kolitka106.06.2022 03:33 -
Надо написать проблематику влияние Компютера на здоровье человека. Тоесть...
nastya36842167818.02.2021 04:52 -
В терминологии сетей TCP/IP маской сети называется двоичное число, определяющее,...
yackubovitchso18.03.2021 04:00 -
Подскажите, что нужно добавить в программу, чтобы сделать 1 заголовок (h1)...
julietsimms29.08.2021 11:25 -
У тебя есть флешка объемом 2Гб. поместятся ли на неё 3 файла размером 1535Мб?...
gabadunka06.05.2023 14:05 -
Выполните вычисления по блок схеме для числа ОЧЕНЬ...
счасливыйребенок29.02.2020 10:55 -
Нужен правильный ответ на , необязательно с решением....
ЭдикБел02.03.2021 03:23 -
Напишите в паскале говорят, что плохой программист – это тот, кто считает,...
RedBalloon05.03.2023 03:16 -
Оцените информационный обьем текстового файла в килобайтах,закодированного...
НаsтяПоможет77725.02.2020 02:57 -
Позаповняти пропуски...
Гулбахар01.05.2022 11:13