Вывести в программе паскаль только нечетные числа от 1 до n.Помогите пожалуйста.

0 голосов

Вывести в программе паскаль только нечетные числа от 1 до n.Помогите пожалуйста.


спросил от (45 баллов) в категории Информатика
1 Ответ
0 голосов
ответил от БОГ (194k баллов)
 
Лучший ответ

Var n,i:integer;
begin
write('n = '); readln(n);
for i:=1 to n do
 if i mod 2 <> 0 then write(i,' ');
writeln;
end.

Пример:
n = 20
1 3 5 7 9 11 13 15 17 19 

...