Предмет: Информатика,
автор: ksenya11111
Вывести на экран все нечётные числа на промежутке [1,n]
Ответы
Автор ответа:
0
var n, i: integer;
begin
readln(n);
for i := 1 to n do
if (i mod 2 = 1) then
writeln(i);
end.
begin
readln(n);
for i := 1 to n do
if (i mod 2 = 1) then
writeln(i);
end.
Интересные вопросы
Предмет: Физика,
автор: oprulashika
Предмет: Беларуская мова,
автор: zenaluksa
Предмет: Русский язык,
автор: koloskovaksenia7
Предмет: Алгебра,
автор: Koffest