Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
Lena111115
01.02.2021 10:38 •
Информатика
Найти сумму положительных кратных 7 чисел,меньших 100.
Показать ответ
Ответ:
TTpopoK
19.07.2020 21:19
Uses crt;
var i,s:integer;
begin clrscr;
s:=0; i:=7;
while i<100 do
begin
s:=s+i;
i:=i+7
end;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
carrot4
02.10.2021 01:30
Nучащихся одного класса получили оценку за контрольную работу. сколько учащихся получили двойку...
patimatgemmamailru
23.10.2022 06:51
:среди заданных чисел найти сумму всех четных цифр. формат ввода: на первой строке задано количество чисел последовательности (неотрицательное, целое число не превосходящее 30000)....
Eugene032
15.03.2020 22:43
:в натуральном числе, найти количество цифр, которые больше его десятков. формат ввода: на вход подается натуральное число от 10 до 30000. формат вывода: найденное количество....
Fissadi
29.07.2022 15:21
Решить : по возрастанию а лебедь | рак | щука б лебедь & рак в лебедь & рак & щука г лебедь | рак...
KRASAVKA555
23.09.2020 16:03
Переведите с Python на Pascal. import random n = int(input()) a = 0 f = [[random.randint(-1000, 1000) for i in range(n)] for j in range(n)] for i in range(len(f)): print(*f[i])...
Пиоооьлл
25.04.2020 12:30
Точка 0-центр вписаного в трикутник MNK кола . Кут ONK = 50° .Кут 0KM= 30°. Знайти кути трикутника. ...
ilyas59
19.05.2021 00:10
работнику выплачено вознаграждение 1.220.000 сумов.он купил на сотую часть премии подарок для своего сына.Сколько стоит подарок?...
дамчок
14.10.2020 18:11
Задания по повести М.Парр «Вафельное сердце» 1. Вам предложены цитаты из повести. Определите, кто скрывается за героями,выделенными жирным шрифтом, — взрослые или дети? (Поставьте...
alkadraz12321
02.12.2022 19:19
Найти грамматическую основу в предложении? Они необычно отчетливые будто бриллиантовые бусина на чёрном бархате. ...
zhirola2013
11.02.2021 14:34
Составить уравнения химических реакций в молекулярном и ионном виде: 1)азотная кислота + оксид меди (II) = 2)серная кислота + магний= 3)соляная кислота + нитрат серебра= 4)гидроксид...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,s:integer;
begin clrscr;
s:=0; i:=7;
while i<100 do
begin
s:=s+i;
i:=i+7
end;
writeln(s);
end.