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

Выведите на экран в строку все числа первой сотни, но только четные

Ответ:

MiliitVel1

24.07.2020 11:06

Var a,b,c:integer;
begin
for a:=1 to 100 do begin
if a mod 2 = 0 then write(' ',a,' ');
end;
end.

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

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

TuyaChimitova

28.06.2021 19:56

Дан массив, состоящий из 15-ти целых чисел, найти минимально из них и заменить его на сумму первого элемента и последнего....

oksa4va

25.12.2020 21:11

Посмотрите на фрагмент программы и подпишите тип переменной для правильной работы кода: ( ) name=(input(«Здравствуйте! Введите свое имя: »))...

nastya2739

03.05.2020 17:07

Программу суммирования 10 последовательных натуральных чисел начиная с z...

Кея1563

05.03.2021 10:01

Сопоставьте хэш строки olympiad с алгоритмом, с которого этот хэш был получен. b2x5bxbpywq= 1c96309e0b179d075b67a709d179bbd9aabd6ca9 73a57cbe998e4f348dae134172aa66b8286026dcade78193a4eea4e685aa398b...

sebasogo

09.07.2022 15:12

Выполнить умножение (произведение разности и суммы двух выражений). (a^2+1) (1-a^2)...

АлиночкаБурова

11.03.2023 15:47

Дорога в музыкальную школу занимает у кати 25 мин.в какое время катя должна выйти из дома,если в школе нужно быть в 16 ч 15 мин? с объяснением...

aleksinia

04.08.2022 21:44

Скільки років тривала царська доба в історії 30 решите....

Aidan23

10.02.2021 06:33

Вывод: что такое приливы и отливы? 40...

Yatoi

28.06.2021 21:37

Напишите письмо своему сверстнику, живущему далеко от твоего дома. расскажи ему о своей малой родине. ( город курган )...

popopoppop2016

28.08.2022 22:38

Скільки років тривала царська доба в історії 50 решите....

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

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