Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
Эверяшка
04.06.2023 20:56 •
Информатика
Добрые люди, которые шарят в информатике, а именно в паскале абс, ! : ) буду премного вам )) звучит следующим образом: "вывести на экран в столбик те натуральные числа от 1 до n, которые делятся на 2 и не делятся на 4".
Ответ:
Danil111112
18.09.2020 01:45
Var i,n:integer;
begin;
readln(n);
for i:=1 to n do
if (i mod 2=0) and (i mod 4<>0) then writeln(i);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
vtkmlth
25.02.2020 12:51
Чему равен один бит ? а)0.125кбайта б)0.000125кбайта в)0.0125кбайта г)0.000000125кбайта...
leralerav
25.02.2020 12:51
Написать программу вычисляющую таблицу кубов чисел от -10 до 10...
SashaPoznavatel
25.02.2020 12:51
Один символ алфавита пламени таки весит 8 бит.сколько символов в алфавите племяни? а)128 б)256 в)32 г)8...
Спирт95
25.02.2020 12:51
Уваси скорость соединения интернета равна 2^25бит/с.сколько времени будет скачиваться файл размером 32мбайт? ответы: а)1с, б)6с, в)8с, г)16с...
tanyapolya76ovv7hr
17.12.2020 05:22
Переведите числа в десятичную систему,а затем проверьте результаты,выполнив обратное переводы:первые числа-110100второе-112...
незнайка1186
30.03.2023 11:02
Хочу заказать наушники беспроводные. они подключаются через блютус. пишут что они на айфон. как думаете, если у меня мейзу, то подключатся ли они к блютусу? ...
Eskhere
26.01.2020 08:35
70 ! информатика 8 класс! система кумир. хотя бы 1ю , если и с 2мя последними, буду безумно ! заранее !...
Julydd
03.05.2023 04:41
Предложение. Разберите его по членам предложения.$ 31. излоЖЕНИЕсжатое изложениедате такое изложение, в которомЛасточкадомик.ния нужно выбрать из текста основное...
Marlie
06.02.2023 23:25
При каком значении переменной a переменная y будет равна 10?...
dima11232
14.02.2023 17:01
Речовини з яких при асиміляції утворюються білки...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
begin;
readln(n);
for i:=1 to n do
if (i mod 2=0) and (i mod 4<>0) then writeln(i);
end.