Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
katy12345652564
28.02.2022 05:54 •
Информатика
Pascal. найти сумму целых положительных чисел, больших 30 и меньших 100, кратных трем.
Показать ответ
Ответ:
werasdfghjfdfd
03.10.2020 10:30
Var summ: integer;
begin for var i:=30 to 100 do begin if (i mod 3) = 0 then summ := summ + i; end; writeLn('сумма = ', summ);end.
0,0
(0 оценок)
Популярные вопросы: Информатика
АлексейGrigorjew
25.01.2020 09:51
Все пятибуквенные слова,составленные из латинских букв f.n.s записаны в алфавитном порядке.вот начало 1 2 n 3 s 4 fffnf определите какие слова будут идти в этом списке...
tyzigfr
25.01.2020 09:51
Переведите целые числа из десятичной системы счисления в двоичную а)89.желательно решите на листочке)...
nikita2455
25.01.2020 09:51
Кто такой эйлер,честь которого названа графическая схема...
nikita54wwe
07.02.2022 11:49
Определите значение переменной с после выполнения следующего фрагмента программы: Подпись отсутствует70-2013020...
abart
29.07.2021 10:46
Упорядочите устройства внешней памяти в порядке убывания их ёмкости. Расположите элементы в правильном порядке: 1 DVD-диск 2 флэш-накопитель, SD-карта 3 CD-диск 4...
stik6
19.02.2020 08:48
Дано четырехзначное число. Найти: а) число, полученное при прочтении его цифр справа налево; б) число, образуемое при перестановке первой и второй, третьей и четвертой...
tcacencoanastap08j8v
12.05.2022 06:09
Рассматривается множество целых чисел, принадлежащих числовому отрезку [2476; 7857], которые удовлетворяют следующим условиям: − кратны 2, но не кратны 8; − цифра...
TuyaraPotapova
26.02.2023 02:35
Сколько весит изображение, если известно что размер его составляет 2048*2048 пикселей, а палитра состоит из 656636 цветов? ответ указать в оптимальной единице....
redckast
07.04.2021 04:29
5.1, 5.2, По аналогии предидущего д/з в тетради поэтапно описать модель, составить трассировочную таблицу(не менее трех различных вводов данных), составить код на...
gulzazak
02.05.2023 05:06
Опиши своими словами почему создание презентации - это проект....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin for var i:=30 to 100 do begin if (i mod 3) = 0 then summ := summ + i; end; writeLn('сумма = ', summ);end.