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

Найти сумму чисел, кратных трем в диапазоне от 0 до 50

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

↓

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

Dasha2302

04.10.2020 00:02

Запиши в тетради и название функции то приведённых ниже пиктограмму расположенных на рабочем столе...

БелаяЧёрнаяБелка

07.05.2022 08:36

В саду растут фруктовые деревья: из них 338 яблони, 228 груши, 168 слив и 178 вишен. Сколько всего деревьев в саду? ответ представьте в 10 С.С....

Neckbeardicus

21.04.2021 10:49

50 ! переведите арифметические выражения из линейной формы записи в общепринятуюа) m*n*l/(q*r)/zб) m/n/l*(q/r)*z...

nazarushka

01.12.2021 10:36

Что такое алгоритм? а - некоторое высказывание, которое должно быть направлены на поставленной цели б - отражение предметного мира с предназначенное для конкретного исполнителя...

kira1321

10.03.2023 17:43

Напишите программу с использованием цикла с условием. написать программу, которая получает на вход два целых числа а и в (0 a b) и выводим все натуральные числа в интервале...

DreamEvilDead

10.01.2022 03:09

Вкниге 32 страницы на каждой странице 2048 символов. какой объём информации (в килобайтах) содержится в книге, если используемый алфавит состоит из 16 символов?...

Nastiya320

30.08.2022 03:13

1.переведите арифметические выражения из линейной формы записи в общепринятую а) m*n*l/(q*r)/z б) m/n/l*(q/r)*z...

nikitanosach2901

15.12.2021 02:31

10. построить блок-схему по программе: program zadacha (input, output); var x1, y1, x2, y2, с: real; beginwriteln ( введите значения x1, y1, x2, y2 ); readln (x1, y1, x2, y2);...

pashka4060

28.09.2021 06:17

сообщение объемом 1/256 мб, записано с 256 символьного алфавита вес сообщения занимает 4 стр по 32 строки, определить количество символов строке....

batya757757

05.05.2022 09:07

На формі у поля для введення вести значення радіуса r та вивести значення площі круга s що обчислюється за формулою s=πrдруга степінь...

Ответ:

Tractorust

17.09.2020 13:26

Var k,sum:integer;
begin
sum:=0;
for k:=0 to 50 do
if(k mod 3 =0) then sum:=sum+k;
writeln(sum);
end.

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

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

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