Войти Регистрация Спроси ai-bota

Распечатать на паскале первые nчетных чисел,заранее пасибо

Показать ответ

Ответ:

astreyalirey

10.07.2020 17:53

Var a:array[1..100] of integer;
n:integer;
begin
readln(n);
for i:=1 to 2*n do
if a[i] mod 2 =0 then writeln(a[i]);
end.

0,0(0 оценок)

Популярные вопросы: Информатика

720612

31.07.2021 22:25

У исполнителя Альфа две команды, которым присвоены номера: 1. прибавь 1 2. умножь на b (b - неизвестное натуральное число; b ≥ 2) Выполняя первую из них, Альфа увеличивает число на...

ksusa8613

27.11.2022 21:13

Задание 5. Циклы.По каналу связи передается последовательность положительных целых чисел, все числа не превышают 500, их количество заранее неизвестно. Каждое число передается отдельно....

livekristinka

11.03.2021 13:17

Я подхватил вирус на ПК,который блокирует запуск(точнее закрывает их при запуске) современных антивирусник .Я скачал старую утилиту которая нашла пару троянских прог,но проблема с...

ЛордТарнум

20.05.2020 21:53

(X 2))?a) X=1b)X=2c)X=3d)X=4...

zoriy22

12.03.2023 04:43

БАНЮ ТОТ КТО ОТВЕЧАЕТ НЕ ПРАВИЛЬНО Найти произведение первых 8 натуральных чисел кратных 7 Составьте блок схемы алгоритмовСДЕЛАТЬ БЛОК-СХЕМУ...

Еля2005

27.07.2020 19:00

Каков информационный объём сообщения Скоро Новый год! при условии, что один символ кодируется 2 байтами и соседние слова разделены одним пробелом? ответ дайте в битах....

Bauer322

19.09.2020 10:06

Записать алгоритм нахождения наибольшего общего делителя двух натуральных чисел (m и n) естественном языке...

ViktorNi

29.07.2020 09:29

Нарисуй модель отношений между понятиями компьютер и инструмент...

UraR1

30.10.2020 06:53

с информатикой очень надо...

karina270607

28.08.2020 06:39

Задание на фото, зарание ♡...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку