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

0 голосов
41 просмотров

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


Информатика (45 баллов) | 41 просмотров
Дан 1 ответ
0 голосов
Правильный ответ

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 

(194k баллов)