Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
murat200202
24.12.2020 00:17 •
Информатика
3. найти сумму всех натуральных двузначных чисел, делящихся на 7
Показать ответ
Ответ:
Mariyazh
20.07.2020 18:47
Var s, i: integer;
begin
for i:=10 to 99 do
if i mod 7 = 0 then
s:=s+i;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
NastyaVelly
23.09.2022 12:57
Аб и c целые, a=2, b=8, чему равно наименьшее значение c. (c b) v ((c a-b)^(c...
Антонио789176
15.08.2021 12:24
Сколько весит символ из 32 –символьного алфавита 6 бит 5 бит 8 бит 4 бита...
пподрао
14.12.2020 05:15
1.На основании документа Отчет о розничных продажах оформляется: Выберите один ответ: a. Приходный кассовый ордер b. Справка-отчет кассира-операциониста c. Возврат товаров от...
филькатв
05.03.2020 10:12
Напишите программу, которая вводит два вещественных числа, a и b ( a b ), и выводит через пробел 5 случайных вещественных чисел в полуинтервале [ a , b ) . входные данные входная...
Taynik
22.04.2022 19:19
1)сколько раз будет исполнен цикл в фрагменте программы: p: =25; k: =0; repeat p: =p*0.2; k: =k+1; until p 0.2; 2)чему равна сумма а[1] и а[4] элементов массива, сформированного...
катяшакотик
06.03.2023 01:50
Скажите названия цветов примерно 25 штук...
arven88
06.03.2023 01:50
Задали что определить где точка запятая и т.д.вот: как быстро пролетело лето уже наступила осень желтеют листья на деревьях чаще стали лить дожди скоро и птицы улетят в тёплые...
мари420
06.03.2023 01:50
Какие досьоппримечательность есть в россии...
dasha3012008
06.03.2023 01:50
Какие чувства у вас вызывает произведение ф.шуберта аве мария ?...
fantomidri
06.03.2023 01:50
Описать человека (лицо тело ,волосы,глаза )на 10 -12предложений! заранее )...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
for i:=10 to 99 do
if i mod 7 = 0 then
s:=s+i;
writeln(s);
end.