Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
АлфавитABC
07.07.2022 05:04 •
Информатика
1. вывести на экран все целые числа от 100 до 200, кратные трем.
Ответ:
edelbi9512
17.09.2020 22:46
I:integer;
begin
For i:=100 to 200 do
If i mod 3=0 then
Write(i,' ');
end;
0,0
(0 оценок)
Популярные вопросы: Информатика
Сабина11123
22.03.2020 07:01
Сколько цифр «5» в шестеричной записи числа?...
хадЯ66
10.05.2021 17:24
Що таке хмарні технології? Які переваги в їх використанні?...
Али20061111
28.02.2023 20:51
УрФО 4 класс второй этап по информатике последние задание...
edbaldin2017
28.08.2020 03:11
задание небольшое Необходимо записать данную формулу в виде, который может понять Паскаль:...
LEXSUS18
23.11.2020 07:14
а то я ничего не понимаю в этом заранее...
Litel1
04.05.2020 21:09
Решить алгоритмы: а:=14, в:=a*3+a/2, c:=в-a/7, с:=в-а+с, а:= а+с+2+в*2...
misha12e
13.01.2022 02:58
Подберите к словам антонимы....
НИЗНАЙКА2006
07.02.2022 00:46
Topic “FUEL SYSTEM. BRAKES”. 1. Vocabulary. to vary – изменять(ся), менять(ся) to meet the requirements – удовлетворять нужды, требования pound – фунт operating conditions...
Frapado
24.11.2021 03:50
Тарас і Богдан несуть відро з землею, використовши при цьому довгу жердину. Поясніть, чому Тарас, який іде попереду, втомлюється більше, ніж Богдан...
M4xL1ght
27.03.2023 07:14
24 см в кубе перевести в мм в кубе...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin
For i:=100 to 200 do
If i mod 3=0 then
Write(i,' ');
end;