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

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

Ответ:

kulish1103

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

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

DashaDoro03

23.12.2021 17:13

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

marsimonenko2017

26.11.2022 15:31

УМОЛЯЮ ! СОСТАВЬТЕ 5 ВОПРОСОВ, ПО ТЕМЕ ПРИЧИНЫ ЭКОЛОГИЧЕСКИХ ПРОБЛЕМ В КАЗАХСТАНЕ И СДЕЛАЮ ВАШ ОТВЕТ ЛУЧШИМ! крч, это Естествознание, но я не туда нажала, кажется.короче,...

Бацио

09.01.2020 02:38

Program j56; var a, b: integer; begin write( введите 2 числа: ); readln(a, b); if (a b) then if (a mod b=0) then writeln( ваше первое число кратно второму. ); writeln(...

дилирон1

27.03.2021 21:32

Сколько байтов составляет 1/2 килобайта...

zulka123

15.11.2021 19:33

Вящике лежат черные и белые перчатки. среди них две пары черных.сообщение о том,что из ящика достали пару черных перчаток,несет 4 бита информации.сколько всего пар перчаток...

yarrik00yaroslavchik

04.02.2020 12:25

Что не является устройством для ввода информации а)принтер б)сканер в)комп.мышь г)клавиатура?...

kurbanov2017p05b7v

30.01.2021 07:54

Даны координаты точки (x,y). определить, пройдет ли через нее график функции y = 5x. решите ,желательно с фото графика....

Алина052408

25.04.2020 13:26

Алгоритмы и их описания Решите что знайте...

AlinaLay

28.12.2022 16:26

Сколько символов текста можно передать за 5 секунд,используя телефонный канал,работающий со скоростью 56 кбит/с...

pppooppaoappo

28.12.2022 16:26

Значение арифметического выражения: 25^7 + 5^18 – 25 записали в системе счисления с основанием 5. сколько цифр «4» содержится в этой записи?...

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

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