Нет это скорее о выводе real'ов. Типа такого:

Код

write(a:10:6);

Если так, то вот выдержка их доков от Delphi:

Цитата

OutExpr [: MinWidth [: DecPlaces ] ] where OutExpr is an output expression. MinWidth and DecPlaces are type integer expressions. MinWidth specifies the minimum field width, which must be greater than 0. Exactly MinWidth characters are written (using leading blanks if necessary) except when OutExpr has a value that must be represented in more than MinWidth characters. In that case, enough characters are written to represent the value of OutExpr. Likewise, if MinWidth is omitted, then the necessary number of characters is written to represent the value of OutExpr. DecPlaces specifies the number of decimal places in a fixed-point representation of one of the Real types. It can be specified only if OutExpr is one of the Real types, and if MinWidth is also specified. When MinWidth is specified, it must be greater than or equal to 0.

Цитата(Unknown @ 11.7.2004, 02:22)

"Не прибегая к помощи компьютера определите результат выполнения программы :" . var j, n : word; a, b, c : LongInt; begin n := 25: a := 1; b := 1; for j:= 3 to n do begin c := b; b := a + b; a := c; end; WriteLn('F_', n, ' = ', b); ReadLn; end. (С.А. Немнюгин, "Turbo Pascal", учебник, стр.49, упр.1.4)

Задача к программированию, если честно сказать имеет малое отношение.
Единственное, что требуеться увидеть в ней числа Фибонначи (если знать что это такое.
Далее можно выписать все числа до 25, можно меньше, если знать свойство:
Fn+m=Fn-1*Fm+Fn*Fm+1. В нашем случаи разбиваем как 13+12 и получаем, что F25=F12*F12+F13*F13=F12^2+F13^2. Если человек не первый раз видит ряд, то можно вспомнить, что F10=55, F12=144, F13=233 (я вспомнил. Иначе просто выписать.
Таким образом, задача имеет математический характер.