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

Найти сумму чисел, кратных 3 от 1 до 100.

Показать ответ

Ответ:

mogilevser

05.10.2020 07:27

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

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

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

Maxys365

20.10.2020 07:09

Определите значение высказывания источником информации может быть только живое существо а)истина б)ложь...

GGame78

06.08.2022 21:04

Пользователь работал с файлом c document\seminar\math\lesson.htm. затем он поднялся на один уровень вверх, создал там каталог info, в нем создал еще один каталог form...

MaxAd13

08.08.2022 06:10

Разгадайте кроссворд «назначение клавиш»: по горизонтали: 1) на «экран» вверх; 2) стереть слева; 3) в конец строки; 4) стереть справа; 5) на начало строки; 6) перейти...

михалыч676

01.12.2021 23:32

1.ЗАПИСАТЬ ИСХ. И ЧИСЛОВЫЕ ДАННЫЕ 2. РАССЧИТАТЬ РУКС ₽ ИСПОЛЬЗУЯ КУРС $ КАК ОБС. АДРЕС3.РАСЧИТАТЬ КУРС ЕВРО ИСПОЛЬЗУЯ КУРС ЕВРО 4. УСТАНОВИТЬ ДЕНЕЖНЫЙ ФОРМАТ СООТВЕТСТВУЮЩИХ...

DashaRossgard

07.10.2020 23:58

Как установить игру формата java на телефон? найти файл...

emil132

08.03.2023 15:09

Если в алгоритме действия выполняются строго друг за другом, то такой алгоритм называется...

даниил854

08.03.2023 15:09

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

математик215

08.03.2023 15:09

Даны 3 числа определить,что больше сумма или произведение этих чисел паскаль...

viginipinigivini

25.01.2021 23:29

Сколько глаголов среди слов? пробежит, одуванчики, большое, наблюдать,вершина,далекий,толкал,жизнь,стройная, бьют,, скорлупка, известный,краснеют, шел,снегопад, легкий,...

ritailicheva0

25.01.2021 23:29

0.7(2×-9y)-4(0.25×-y).если ×=0.7.y=-0.4...

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

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