Напишите (паскаль)программу которая выводит на экран числа 20 40 80 160 320

Конечно, вот пример программы на языке программирования Паскаль, которая выводит на экран числа 20, 40, 80, 160 и 320.

Программа использует цикл для генерации последовательности чисел, каждое из которых является удвоением предыдущего, начиная с 20.

program SequenceOutput;
uses crt;

var
  i, num: Integer;

begin
  clrscr;
  num := 20;
  for i := 1 to 5 do
  begin
    writeln(num);
    num := num * 2;
  end;
  readln;
end.

Пояснение:

1. Объявление программы и подключение модуля crt:

   program SequenceOutput;
   uses crt;
   

   Программа начинается с ключевого слова program, за которым следует имя программы. Модуль crt используется для работы с экраном и клавиатурой.

2. Объявление переменных:

   var
     i, num: Integer;
   

   Объявляются две переменные типа Integer: i для управления циклом и num для хранения текущего числа последовательности.

3. Начало основной части программы:

   begin
     clrscr;
     num := 20;
   

   Очищается экран с помощью clrscr и переменной num присваивается начальное значение 20.

4. Цикл for для генерации и вывода чисел:

   for i := 1 to 5 do
   begin
     writeln(num);
     num := num * 2;
   end;
   

   Цикл for выполняется 5 раз. На каждой итерации выводится текущее значение переменной num, после чего оно удваивается для следующей итерации.

5. Завершение программы и ожидание ввода:

   readln;
   end.
   

   Программа завершает выполнение, ожидая нажатия клавиши пользователем, чтобы можно было увидеть результат на экране.

Эта программа эффективно демонстрирует использование цикла для генерации и вывода последовательности чисел с удвоением каждого предыдущего.

program PrintNumbers;

var i, num: integer;

begin num := 20;

for i := 1 to 5 do begin

writeln(num);
num := num * 2;

end;

end.