Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
А00000а
08.03.2022 17:05 •
Информатика
Найти сумму от 100 до 200,кратных 17
Показать ответ
Ответ:
bersenevaksenia1
23.05.2020 15:02
var i,s:integer;
Begin
for i:= 100 to 200 do
if i mod 17=0 then s:=s+i;
writeln(s);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
volontir00
10.01.2021 07:45
1. некоторый алгоритм из одного числа получает новое число следующим образом. сначала записывается исходное число, а затем к нему приписываются цифры исходного числа в обратном...
3743Dasha
13.11.2020 20:52
Я показала вам изображение четырёх людей: мальчонки-блондина, девчушки-блондинки, мальчонки-брюнета, девчушки-брюнетки. Я выбрала цвет волос (чёрный или белый) и пол (мальчонка...
Nasib15
26.11.2022 08:09
Привет с задачей (язык Python) Задача 3. Файлы В одной IT-компании существует негласный закон об именовании текстовых документов: Название файла не должно начинаться на...
Kroq123
08.06.2023 23:19
за правильный ответ и пояснение. Задача не из легких не знающим не писать....
timahipoDrakeylol
22.01.2023 01:31
3. Реши задачи. Объём сообщения равен 15 Кбайт. Сообщение содержит 24 576 символа. Какова мощнасть алфавита, с которого записано сообщение? Для записи сообщений использовался...
shkuta03
31.05.2021 08:26
Статистикалық мәліметтер. 2-сабақ білім ленд...
misscalina1950
07.04.2023 13:00
Склавиатуры вводятся 20 чисел. найти произведение чисел кратных 5. найти количество неотрицательных чисел. решить эту надо в turbo pascal, методом repeat until или while...
Alya23051
07.04.2023 13:00
Укажите основные отличительные особенности систем windows: а) поддержка графического режима работы в) возможность использования на любых, в том числе маломощных, компьютерах...
Ekaterina2558
07.04.2023 13:00
Найти произведение цифр заданного черыхехзначного числа. (в паскале, неиспользуя цикл)...
Кирилл42352
07.05.2021 00:25
1. 2-3 примера фактов из области , или биологии. 2. 2-3 примера правил,изученных на уроках языка,. 6 класс....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var i,s:integer;
Begin
for i:= 100 to 200 do
if i mod 17=0 then s:=s+i;
writeln(s);
End.