Составьте программу вывода на экран всех нечетных чисел от - 10 до 50

program zz1;

var i:integer; / / задаем переменную цикла целого типа

begin

for i:=-10 to 50 do / / организуем цикл от первого заданного числа до последнего заданного числа

if (i mod 2 = 1) or (i mod 2 = - 1) / / проверяем, если число не делится на два, то выводим его на экран в строчку через пробел

then write (i,' ');

end.