Chief-NET |
Привет, Гость! Войдите или зарегистрируйтесь.
Решил я свои школьные работы перенести на ноутбук. На буке виста. Турбо Паскаль на нём работает, мягко говоря, не очень. Поставил я себе Borland Delphi C++ 2009 Builder. Простое открытие *.pas файлов ничего не дало. Думаю, наверное надо просто скопировать текст программы и вставить в Delphi. Я щёлкаю создать консольное приложение Delphi, копирую текст своей проги и получаю такую фигню. Каким образом это всё запустить?
Отредактировано splinker (2008-12-03 23:52:51)
Лучше скинь свои проги, а кто-нить их попытается запустить на делфях...
А что - у меня тоже виста, паскаль работал вроде...
Ты не указал директиву {$APPTYPE CONSOLE}, потому и ошибка
Вот как нужно:
program fibonach;
{$APPTYPE CONSOLE}
var n, i, fib, fib1, fib2: integer;
begin
readln (n);
if ((n=1) or (n=2)) then fib:=1 else
begin
fib1:=1;
fib2:=2;
for i:=3 to n do
begin
fib:=fib1+fib2;
fib1:=fib2;
fib2:=fib;
end;
end;
writeln ('Tigran Молодец! ', fib);
readln;
end.