Заполните массив из 5 элементов вводом с клавиатуры

Question

Заполните массив из 5 элементов вводом с клавиатуры

---

Answer 1

Program test;

var
  a:array[1..5] of integer;
  i:byte;

begin
  for i:=1 to 5 do
    Readln(a[i]);
  Write('Получившийся массив:');
  for i:=1 to 5 do
    Write(' ',a[i])
end.

Comments

Спасибо кича

---

Киса*