Дано описание массива:
var a:array [1..14] of integer;
Здесь описан массив а из
целочисленных значений. При
выполнении этого оператора в памяти
компьютера будет выделено
ячеек целого типа.​

Устройство ввод-периферийное оборудование для занесения (ввода) данных или сигналов в компьютер либо в другое электронное устройство во время его работ/Сканер,Видео-и Веб-камера,Цифровой фотоаппарат,Плата видеозахвата,Микрофон,Цифровой диктофон,Мышь,Трекбол,Тачпад,Световое перо,Графический планшет,Тачскрин,Джойстик,Устройства основанные на компьютерном зрении типа Kinect.
Устройство вывода - периферийные устройства, преобразующие результаты обработки цифровых машинных кодов в форму, удобную для восприятия человеком или пригодную для воздействия на исполнительные органы объекта управления.
Монитор (дисплей),Принтер,Графопостроитель(плоттер),Встроенный динамик,Колонки,Наушники

Факториалом числа называет произведение всех чисел от 1 до этого числа. Нам нужно посчитать 1 * 2 * 3 * 4 * 5 * 6 * 7 тремя и убедиться, что получится 5040.

PascalABC.NET 3.2
begin
  var fact := 1;
  var i := 1;
  while i < 8 do
  begin
    fact *= i;
    i += 1;
  end;
  println('Через while получилось', fact);

  fact := 1;
  for i := 1 to 7 do
    fact *= i;
  println('Через for получилось', fact);

  fact := 1;
  i := 1;
  repeat
    fact *= i;
    i += 1;
  until i > 7;
  println('Через repeat получилось', fact);
end.