Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
dĵdjdkdkdkdkdk
27.12.2022 21:15 •
Информатика
Найти сумму чисел, кратных трем в диапазоне от 0 до 50
Показать ответ
Ответ:
HomelessGod1
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 оценок)
Популярные вопросы: Информатика
динара259
19.02.2021 09:02
Перечислите основные составляющие электронной коммерции в сети Интернет....
Natiman
19.02.2021 09:02
ЗАВДАННЯ. 1. Створити 3 документи в різних додатках з використанням малюнків, графіки та різного оформлення (можна використати Word, Excel, …) 2. Описати основні можливості...
Ульяна122004
03.11.2020 10:05
Составить таблицу в эксель Составить таблицу, позволяющую автоматизировано рассчитывать квартплату квартиросьемщиков. Расчет квартплаты Р осуществляется по формуле:...
rrrrreeeeyttttyuytpq
26.03.2022 04:18
Написать программу, которая принимает от пользователя некоторое число.Оно должно повторяться в виде цикла неопределенного долго, пока пользователь не ведет задуманное...
коля861
14.03.2022 05:05
Минимальный состав ПК: а) винчестер, дисковод, монитор, клавиатура; б) дисплей, клавиатура, процессор, память; в) принтер, клавиатура, монитор, память; г) винчестер,...
StenxgenS
16.01.2022 10:40
Вы патрулируете город со своим напарником, и видите как за девушкой бегут пять мужчин и что-то кричат. По их интонации, вы понимаете, что девушке грозит опасность. Исходя...
dilnuscha
03.07.2022 16:05
Скажите задание 2а) будет какой ответ? А то два разных получается...
youngest1111
25.04.2023 06:49
нужно составить программы для Python решая задачи 2. Даны три различных числа A, B, C. Выведите на экран значение среднего из них. 4. Даны три числа, два из которых...
Настя456456
29.01.2021 10:34
В матрице K(7, 7) найти и записать в одномерный массив А нечетные элементы среди элементов, сумма индексов которых – четная. Переставить элементы в полученном массиве...
Таня13151814
14.04.2021 11:21
Найти среднее арифметическое в каждой строке массиво а(1: 3, 1: 2) исполнить алгоритм для массиво 2 5 8 6 7 5...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
sum:=0;
for k:=0 to 50 do
if(k mod 3 =0) then sum:=sum+k;
writeln(sum);
end.