Войти
Регистрация
Спроси ai-bota
В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Показать больше
Показать меньше
Miratrix
14.07.2022 12:31 •
Информатика
Составьте программу для вычисления суммы: 3+6++27
Ответ:
юлия1921
10.10.2020 05:08
var s:integer;
begin
for i:=3 to 27 do begin
if i mod 3=0 then s=s+i;
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
malina20023
09.10.2022 21:40
Найдите время, за которое файл размером 220 б будет передаваться через некоторый канал связи, пропускная которого 22 б/с...
Ука12345
10.04.2020 21:49
Дан массив из n элементов определить количество элементов имеющие четные порядковые номера и являющиеся нечетными номерами...
LK2002
18.03.2023 20:36
Всистеме программирования pascal abc выполните проверяемое cif2 для исполнителя робот (закрасить клетки, у которых сверху или снизу есть стена) (рис. 3.46). положение стен...
Amin1402
13.03.2023 18:33
На паскале нужно сделать: найти количество четных чисел в диапазоне от a до b; поменять местами значение переменных a и b 70 !...
Соня2340
12.06.2021 13:52
Основным хозяйственным занятием ясачных людей было...
nusbek
08.09.2021 11:04
Арабські цифри в західній Європі почали використовувати...
АлександровнаСаша
08.09.2021 11:04
Как относятся стороны двух квадратов если их площади относятся как Умоляюю ...
rustamahiyarov
27.02.2021 19:53
За 3 рейси 9 однакових автобусів перевезли 1404 туристів. Скільки туристів перевозив 1 автобус за 1 рейс...
dimakolobanov2
27.02.2021 19:53
Основанием пирамиды является квадрат со стороной 20 см. Одно боковое ребро перпендикулярно плоскости основания и равно 15 см. Вычисли площадь боковой поверхности....
viktorija0811
31.05.2023 21:59
Найдите значение выражения: 1) −5,18:5,6+22,12:1,6...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var s:integer;
begin
for i:=3 to 27 do begin
if i mod 3=0 then s=s+i;
end;
writeln(s);
end.