Войти Регистрация Спроси ai-bota

Найти сумму положительных четных чисел, больших 150 и меньших 200 pascal

Ответ:

Мосендз

04.10.2020 06:56

Var i,s:integer;
begin
s:=0;
for i:=150 to 200 do
if i mod 2=0 then s:=s+i;
writeln(s);
end.

0,0(0 оценок)

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

mugenovak

21.04.2020 17:03

Составьте алгоритм ваших действий в следующей ситуации: «вы почувствовали запах газа в квартире»....

kpopersha13

06.05.2021 08:37

Нужно решить до завтра.завтра последний день сдачи индивидуальной работы. «программирование» 9 класс №1 записать по правилам изучаемого языка программирования следующие...

Katyakat20050904

06.05.2021 08:37

Средняя скорость передачи данных по некоторому каналу связи равна 29 кб/с. сколько секунд потребуется для передачи по этому каналу 50 страниц по 96 символов один...

0Али2005

06.05.2021 08:37

Написать программу калькулятор : два числа, символ арифметической операций (+*,/),вывести результат в виде (5 +6=11)...

КЕКАke

06.11.2020 13:37

Выбери из предложенного списка команду для сохранения звукового файла в программе AUDACITY. СОХРАНИТЬ КАК СОХРАНИТЬ ЗАКРЫТЬ ЭКСПОРТ АУДИО...

Kotik20052005

19.11.2021 01:39

Написать программу для решения задачи. Определить, является ли число однозначным, двузначным или трёхзначные...

ArtemFediroolosb

03.12.2020 01:20

Искусственный источник информации: 1) гром 2) календарь 3)пчела 4)человек...

Kirra24

18.12.2022 02:16

Написать сообщение о фразеологизмах , появившихся на основе произведений писателей...

kuzyaevkuzyaev2

18.12.2022 02:16

Составь предложение со словами подводная поземный прекрасный чистенькое 29...

vladputilov451

18.12.2022 02:16

Овощ.плоды которого самые большие из всех ововей....

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку