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

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

Нажмите на рекламу ниже и сразу увидите ответ

↓

Популярные вопросы:

karinashakhbaz

07.01.2020 01:17

Что является действиями с информацией...

pasha19899p06z9m

02.12.2021 02:28

Устройства хранения данных- устройства вывода данных-...

Chchcjcujcj

26.02.2022 18:13

нформатика программа скретч...

amink1a

26.02.2022 18:13

Сканируется цветное изображение размером 6 x 9 дюйма. Разрешающая сканера 350 x 600 dpi, глубина цвета – 2 байта. Какой информационный объем будет иметь полученный графический...

Lizaliza123123

26.02.2022 18:13

Определите уровень звука при условии что звуковое давление равно 104,57 Па...

509788866

03.10.2022 08:13

Можете обьяснить поэтапно, как 95) упражнение... ответ должен получится ВАС!...

martyanovvanya1

13.02.2022 04:33

Дано 4 числа найти сумму чисел, извлечь количество сотен, если четное, то найти среднее этих чисел, а , если нет, то произведение...

aleksinia

22.04.2020 19:28

1-1 2-2 3-0 4-1 20-2 21-0 правило преобразования...

isahak

22.04.2020 19:28

По какому правилу числа следуют друг за другом исправь ошибки 2,12,13,23,24,35,...

jono1

22.04.2020 19:28

Составить программу для нахождения суммы последовательности чисел произвольного диапазона(паскаль)...

Ответ:

Tillll

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 оценок)

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

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