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

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

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


Информатика (45 баллов) | 87 просмотров
Дан 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 баллов)
10,984,878 вопросов
13,471,016 ответов
8,518,553 комментариев
4,909,216 пользователей