Question

ПАСКАЛЬ! Вывести на экран нечетные числа от 50 до 10.

Answer 1

Ответ:

program z1;

var i:integer;

begin

for i:=50 downto 10 do

if i mod 2 <> 0 then write(i,'  ')

end.

Объяснение:

Используем цикл со счётчиком

Проверяем является ли число нечётным, если да, то выводим его на экран

Answer 2

Конечно, вот пример программы на языке Pascal, которая выводит на экран нечетные числа от 50 до 10:

pascalCopy code
program OddNumbers;
var
  i: integer;
begin
  for i := 50 downto 10 do
  begin
    if i mod 2 <> 0 then
      writeln(i);
  end;
end.

Эта программа использует цикл for, начиная с числа 50 и уменьшая его до 10. Затем она проверяет, является ли текущее число нечетным (путем вычисления остатка от деления на 2), и если да, то выводит его на экран с помощью процедуры writeln.