Из предложенных операторов составьте 2 задачи Заполните массив степенями числа 2 (от 2^1 до 2^N) Заполните массив элементами арифметической прогрессии. Её первый элемент и разность вводятся с клавиатуры. const N=10; var St,i: integer; A: array[1..n] of integer; var a,p,N,i: integer; M: array[1..100] of integer; Begin St:=1; For i:= 1 to N do Begin St:=St*2; A[i]:=St; Write(A[i],' ') End; End. Begin Read(N); Read(a,p); M[1]:=a; For i:=2 to N do Begin M[i]:=M[i-1]+p; Write(M[i],' ') end; end.
Задание

Из предложенных операторов составьте 2 задачи

  • Группы
    • Заполните массив степенями числа 2 \(от 2^1 до 2^N\)
    • Заполните массив элементами арифметической прогрессии. Её первый элемент и разность вводятся с клавиатуры.
  • Варианты
    • const N=10;
      var St,i: integer; A: array
      \[1\.\.n\]
      of integer;
    • var a,p,N,i: integer; M: array
      \[1\.\.100\]
      of integer;
    • Begin
      St:=1;
    • For i:= 1 to N do
      Begin
      St:=St*2;
    • A
      \[i\]
      :=St;
      Write\(A⟨2⟩,' '\)
      End;
      End.
    • Begin
      Read\(N\);
    • Read\(a,p\);
    • M
      \[1\]
      :=a;
    • For i:=2 to N do
      Begin
      M
      \[i\]
      :=M
      \[i\-1\]
      +p;
    • Write\(M⟨2⟩,' '\)
      end;
      end.