Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
fayafaya1
04.04.2023 08:33 •
Информатика
Прикольную медаль тому кто даст ! как cделать так что бы в паскале выводились четные цифры. от 0 до 100
Ответ:
kiri4nko
01.10.2020 17:04
Var
i: byte;
begin
for i:=0 to 100 do
if i mod 2 = 0 then write(i:4);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Tigrmigr
07.09.2021 06:35
Ссозданием веб страниц, нужно сделать 4 веб страницы как на фото...
рттири
23.06.2020 14:34
Запишите код программы с операторов интегрированной среды программирования для заданного алгоритма ...
marisha1234567890e
27.03.2021 16:13
Как к числу 329 добавить 1 в машине тьюринга?...
Анастасияя12345
08.05.2021 18:46
Соч по информатике за третью четверть! напишите полностью ответы! 20 за ответы...
наталя40
18.10.2021 15:09
Олимпиада! надо быстро решать!...
Ника260406
19.12.2022 22:27
Какому или каким из перечисленных ниже слов соответствует код x0: $=+0=? слова: орнамент,доминион, рифление,строение, смекалка...
valoparina
19.12.2022 22:27
Составте программу, которая задаёт вопрос: в каком году был основан город минск (например, в 1067г., в 993 г., либо в 1147...
гуманитарий23
01.02.2021 08:27
Световое табло состоит из лампочек. каждая лампочка может находиться в одном из трех состояний( вкл , выкл или мигает ). какое меньшее кол-во лампочек должно находиться...
бернер
16.11.2021 21:44
Страниц-512 строк-32 символов-64 i=16 бит iд=1,44 мб дискет-? ,если можете, надо...
petrenkof1
16.11.2021 21:44
Нужно написать программу на с++. идет n-я секунда суток. определить, сколько полных часов и полных минут до этого момента. + отформатировать исходный код программы. +...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
i: byte;
begin
for i:=0 to 100 do
if i mod 2 = 0 then write(i:4);
end.