Версия для печати темы

Нажмите сюда для просмотра этой темы в обычном формате

Форум «Всё о Паскале» _ Задачи _ Столбики

Автор: DaNTeS 19.01.2007 18:08

В этой (приклеплённой) задачке у меня не получается сделать так чтобы числа выводились по столбикам,
выводятся блин по 11 в одну линию, исправьте ошибку пожалуйста буду бесконечно благодарен....а то уже замучался.....

Добавлено:
Первая процедура*

Прикрепленные файлы
FIBON.PAS ( 1.08 килобайт ) Кол-во скачиваний: 272

Автор: klem4 19.01.2007 18:19

По идее так:

Procedure fibanachi(n:longint;var r:longint);
Var
i,f1,f2,j:longint;
Begin
f1:=1;
f2:=1;
for j:=1 to 4 do Begin
  writeln;
  for i:=1 to 11 do Begin
    r:=f1+f2;
    f2:=f1;
    f1:=r;
    Write(r, ' ');
  end;
end;

Но числа у тебя слишком разного диапазона от 2-х значных до 10-ти значных, так что красиво это выглядеть врятли будет, можно конечно попробовать форматированно выводить (Write(r:11);) но это мало помогает.

Автор: DaNTeS 19.01.2007 18:35

klem4 , большое спасибо систему понял