irinamiller93
19.11.2020 00:53

Напишите на паскаль. 1. вывести все четные числа от 0 до n (n вводится с клавиатуры)

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
vipnikita20199
06.07.2020 10:41
Var i,N:integer;
begin
readln(N);
for i:=1 to N do begin
if (i mod 2= 0)
then
write(i,' ');
end;
end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота