Программисту поставили написать программу, которая по введённому натуральному числу n должна выводить через пробел все нечётные числа из диапазона от 1 до n.программист торопился и написал следующую программу: program error; var n, i: integer; begin; write('9'); readln(n); for i : = 1 to 9 do if (i mod 2 = 0) then write(i); writeln end. с откладки найдите и исправьте допущенные ошибки.

Program error; var n, i: integer; begin; write(' введите натуральное число n ='); readln(n); for i : = 1 to n do if (i mod 2 = 1) then write(i ,' '); writeln end.

Элемент множества                   входит в состав                     предшествует (операционная система)         (прикладные программы)         (редактирование и                                                                                                                 форматирование)

Var j, i, x: integer; a: array [1..20] of integer; begin       randomize;       writeln();       for i : = 1 to 20 do           a[i] : = random(1000);       for j : = 2 to 10 do           for i : = 10 downto j do               if a[i] < a[i - 1]               then               begin                   x : = a[i];                   a[i] : = a[i - 1];                   a[i - 1] : = x;               end;       for j : = 12 to 20 do           for i : = 20 downto j do               if a[i] > a[i - 1]               then               begin                   x : = a[i];                   a[i] : = a[i - 1];                   a[i - 1] : = x;               end;       for i : = 1 to 20 do       if i mod 2 = 0         then           a[i] : = 3 * a[i]       else           a[i] : = 2 * a[i];       writeln();       for i : = 1 to 20 do           write(a[i], ' '); end.