Исследуйте таблицу и выясните, что означают два числа, которые записываются после двоеточий при выводе вещественного значения (знак ◦ обозначает пробел): print( "x={:10.3f}".format(x) ) x=◦◦◦◦12.346
print( "x={:8.2f}".format(x) ) x=◦◦12.35
print( "x={:2.2f}".format(x) ) x=12.35
print( "x={:0.2f}".format(x) ) x=12.35
print( "x={:0.1f}".format(x) ) x=12.3
Заполните пропуски: «Число после первого двоеточия обозначает число после второго двоеточия – Если второе число меньше, чем то при выводе используется количество позиций.

// PascalABC.NET 3.2, сборка 1344 от 22.11.2016
// Внимание! В более ранних версиях работа не гарантируется!

begin
  var m:=ReadInteger('Количество строк в массиве:');
  var n:=ReadInteger('Количество столбцов в массиве:');
  Writeln('Вводите элементы массива');
  var a:=new integer[m,n];
  for var i:=0 to m-1 do
    for var j:=0 to n-1 do Read(a[i,j]);
  Writeln('-'*20);
  foreach var c in a.Cols do Write(c.Sum,' ')
end.

Пример
Количество строк в массиве: 4
Количество столбцов в массиве: 3
Вводите элементы массива
1 6 -2
0 6 8
-3 6 1
4 6 -3

2 24 4

Не особо знаю паскаль, так что дабы не накосячить с синтаксисом, покажу на примере. Тут всё просто - тебе лишь нужен цикл For и расчет процентов.

FOR i = 1 TO 100
percents = FIX(x * p / 100) ' здесь у нас есть переменная percents, которой присваиваются округленные функцией fix проценты (насколько я знаю, в паскале аналогичная функция называется Round)
x = x + percents 'тут всё понятно - переменной X присваивается она сама и годовые проценты по вкладу
IF x >= y THEN 'проверяем, не равен или не превысил ли наш вклад ожидаемую сумму
PRINT i 'в цикле For можно не заморачиваться с отслеживанием лет, переменная i сама подсчитает количество итераций-лет
END 'завершаем программу
END IF
NEXT i ' конец цикла
Можно ещё чисто для себя добавить в условие вывод переменной X, чтобы было нагляднее.