Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
sobchuk555
07.11.2022 11:54 •
Информатика
Найти 18+19+20+21+22+23 с использованием оператора цикла.
Ответ:
Vasilisa5111
11.06.2020 18:40
var
s, i:integer;
begin
s := 0;
for i := 18 to 23 do
s := s + i;
write(s)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
kvas1985
21.01.2021 06:57
Для какого из чисел ложно высказывание: не (число 30) или (число чётное)? 1) 12; 2) 52; 3) 43; 4) 19;...
Thesanek30rusMaps
12.10.2020 18:02
Найдите и откройте Трудовой кодекс Российской Федерации. В каком номере «Российской газеты» был опубликован данный документ 2. Поставьте документ на контроль. 3....
pashafil5
21.07.2020 15:41
Задача №5 Робу выбить каждый камень в сторону ближайшей к нему границы поля....
Snowandsand368
26.10.2022 06:45
Внекотором алфавите записан текст из 300 символов. количество информации 150 байтов.сколько символов в алфавите ? имеется файл с текстом из 200 символов.при наборе...
11264чс
14.03.2021 19:34
Как можно копировать данные таблицы?...
14ксенечка15
14.04.2020 19:50
A: =30 b: =6 a: =a\2*b if a b then c: =a-3*b else c: =a+3*b...
alex1439
23.09.2022 07:00
Своеобразное сочетание которые обеспечивают человеку возможность успешного выполнения какой-либо деятельности...
Эвелишка11
23.09.2022 07:00
Понятие «экзопсихика» означает подструктуру личности, детерминированную отношением человека к внешней среде (определяется...
nikkun80
23.09.2022 07:00
Во всех случаях при использовании методик двойной стимуляции связь между стимулом-раздражителем и стимулом-реакцией отсутствует...
Lisa030105
23.09.2022 07:00
Новое и плодотворное начало ряду исследований в области интеллекта животных было положено работами: В. Кёлера...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
var
s, i:integer;
begin
s := 0;
for i := 18 to 23 do
s := s + i;
write(s)
end.