Question

2. Организовать одномерный массив А{2, 4, 8, …, 1024}. паскаль

Answer 1

Ответ:

Объяснение:

var mas : [0..9] of integer;

x, b, i : integer;

begin

x := 2;

b:= 1;

i = 0;

while x != 1024 do

begin

x:= exp(b*ln(x));

mas[i] := x;

i := i + 1;

b := b + 1;

x := 2;

end;

end;

Если что непонятно или не верно - допишу

Answer 2

Чтобы создать одномерный массив в Pascal, который содержит числа от 2 до 1024 с шагом 2, вы можете использовать следующий код:

pascalCopy code
program ArrayExample;
var
  A: array[1..10] of Integer;
  i, value: Integer;
begin
  value := 2;
  for i := 1 to 10 do
  begin
    A[i] := value;
    value := value * 2;
  end;
  
  // Теперь массив A содержит числа {2, 4, 8, 16, 32, 64, 128, 256, 512, 1024}
  
  // Выводим содержимое массива A
  writeln('Массив A:');
  for i := 1 to 10 do
    writeln(A[i]);
end.

Этот код создает массив A размером 10 элементов и заполняет его значениями от 2 до 1024 с увеличением в два раза на каждой итерации цикла. Затем он выводит содержимое массива на экран.