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

Паскаль, сумма нечетных чисел (1-100), кратных 3

Ответ:

olenkayatsev

05.10.2020 14:04

Program n1;
var i,sum: integer;
begin
sum:=0;
for i:=1 to 100 do if (i mod 3=0) and (i mod 2<>0)
then sum:=sum+i;
writeln(sum);
end.

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

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

098марина080

24.04.2023 21:17

Спо информатике дано изображение размером 1024х128 , 64 пиксельный рисунок...

nikitkaandreev1

27.07.2021 00:24

Напишите основные особенности шинной архитектуры...

arsenteva220103

27.07.2021 00:24

Как записывается команда присваивания ?...

KatinaDobet2006

10.01.2022 01:28

Как число 100 хранится в компьютере...

ANNAAFANASYEVA1

10.01.2022 01:28

Объём диска 600 мб сколько рисунков объемом 300кб можно разместить на этом диске...

nikvermenox7gay

26.02.2023 07:05

4,61+(2,29)= -3,08+1,69= 3/10+(-4/5)= -1/20+1/30= 5/8+(-1)= 2 3/4+(-9 5/6)=...

emiliskenderov

26.02.2023 07:05

Записать в виде суммы удобных слагаемых 100: 4...

CoJlne4Hblu

26.02.2023 07:05

2класс.составьте по 4 уравнения ,используя данные числа .реши их. z,40,70...

мага092

26.02.2023 07:05

Нужно найти главные члены предложений и составить схемы. 1) иногда, когда пламя горело слабее и кружок света суживался, из надвинувшейся тьмы внезапно выставлялась лошадиная...

Dasha9316551

26.02.2023 07:05

Сделать пример 5 целых 11 12 минус 2 целых 1 6 минус 1 целая 3 4...

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

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