. Чим табличні величини відрізняються від текстових або числових величин? 2. Учому особливість опису табличних величин мовами програмування Free Pascal, Python? 3. Учому відмінність табличної величини та елемента табличної величини? 4. Чи обов'язково кожному елементу табличної величини ставити у відповід- нiсть його номер? Для чого потрібні такі номери? Чи можна визначити кількість елементів за описом табличної величини 5. мовами програмування Free Pascal, Рython? 6. Які засоби для введення й виведення елементів табличної величини передбачені у програмах мовами програмування Free Pascal, Python? 7. Які елементи управління використовують для введення чи виведення значень табличних величин у середовищі програмування Lazarus?​​

var
  x: string;
  arr: array of char;

begin
  readln(x);
  arr := x.Split(' ')[1].ToCharArray();
  System.Array.Reverse(arr);
  writeln(length(arr), '   ', new string(arr));
end.

var
  c: array of integer := (10, 20, 10, 30, 40, 50, 55, 1, 5, 9, 4, 3, 2);
  r, q, s: real;
  i, a, b: byte;
  
begin
  q := 1;
  i := 1;
  r := c.Min();
  while (i < length(c)) do
  begin
    q *= c[i];
    i += 2;
  end;
  readln(a, b);
  s := b - a - 1;
  writeln('T = ', (R / Q + 1) + S);
end.

const
  k = 5;
  p = 5;

var
  f: array [1..k, 1..p] of string;
  o: real;
  df: byte;

begin
  for i: byte := 1 to k do
  begin
    for j: byte := 1 to p do
    begin
      f[i, j] := random(10, 99).ToString();
      write(f[i, j]:3);
      if (j >= 7 - i) then
      begin
        o += integer.Parse(f[i, j]);
        df += 1;
        f[i, j] := '██';
      end;
    end;
    writeln();
  end;
  writeln();
  for i: byte := 1 to k do
  begin
    for j: byte := 1 to p do
      write(f[i, j]:3);
    writeln();
  end;
  writeln(o / df);
end.