Несколько воросов от новичка. Паскаль.

[Kobe]

Здраствуйте. Я знаю, что назвал свою тему по глупому, но надеюсь, что вы не удалите ее.

1.
Мой первый вопрос, не удевляйтесь, связан с Delthi. Один приятель по заочной группе сказал, что можно писать паскаль и на Delthi, но для этого нужно создать новый файл и выбрать Console Application. Тут то и начинуются проблемы. Установил Delthi 7. Все делаю вроде как надо, но когда нажимаю F9, то программа не запускается. Что-то мелкнет и все тут.
Попытался вставить не свою программу (взял с форума), то тоже самое.

Потом вставил из учебника вот эту программу

USES		Graph;
VAR  		Device, Mode	: Integer;
BEGIN
	WriteLn(‘Это текстовый режим’); 
				{Инициализируем графический режим:}
	ReadLn;
	Device:=0;
	InitGraph(Device,   Mode,    ’<путь к графическим драйверам>’);
	Circle(100,80,50);	{Обращение к процедуре рисования окружности. Пока без пояснений}
	ReadLn;
				{Закрываем графический режим, что рекомендую:}
	CloseGraph;
	WriteLn(‘Это снова текстовый режим’); 
	ReadLn
END.

то пишет file not found Graph.dcu.


2.

Второй вопрос связан с изучением этого языка. Подскажите книги какие могли бы помочь новичку научиться программировать самостоятельно.

3,
Знаю, что никто не собираеся делать все за меня. Но просто торможу по полной не знаю как сделать вот это задание.

Картотека ь бюро обмена квартир организована в виде линейного списка.
Сведения о каждой квартире включают:
количество комнат;
этаж;
площадь:
адрес.
Написать программу, которая обеспечивает:
начальное формирование картотеки;
ввод заявки на обмен;
поиск в картотеке подходящего варианта: при равенстве количества комнат и этажа и различии площадей в пределах 10% соответствующая карточка выводится и удаляется из списка, в противном случае поступившая заявка включ, ется в список;
О вывод всего списка.
Программа должна обеспечивать диалог с помощью меню и контроль ошибок при
вводе.


Просто не понимаю как это сделать. Покажите хоть подобные программы. Как это вообще должно выглядеть, а то совсем туман.

Надеюсь много мата мое сообшение не вызовет. Обещаю всему со временем научиться самому. А пока пожалуйста помогите.

[DeKot]

Почитай здесь: http://www.programmersforum.ru/showthread.php?t=46035 ну и учебник надо бы какой нить почитать.
Здесь на форуме полно ссылок.

[Solveig]

www.pascaler.ru - там вся теория по Паскалю. Изложено очень неплохо.
Ну, и на форуме, конечно, посмотри)

[Kobe]

По второму вопросу понятно.
Но вот по остальным.

Никак не получается запустить программу на Delhi при помощи Console Application. Не выводит никаких ошибок просто мелкнет окошко и все. Может у меня Delhi косячный или нужно что-то доустанавливать, чтобы программировать на паскаль.

Ну и третий вопрос самый сложный. Помогите кто чем может. Совсем ничего не понятно.

Заранее благодарю.

[spamer]

Ну ясно не будет ниче выводить. Для примера - создайте пустой проект Console Application и между Begin ... End напишите Readln;
Также само и в остальных проектах, в конце ставьте Readln;

P.S. Напишите все таки правильно слово Delphi.

[Serge_Bliznykov]

USES Graph;

Даже не пытайтесь. Если программа на TurboPascal использовала графическую библиотеку (т.е. что-то рисовала в графическом режиме), то в Delphi Console Application это работать НЕ БУДЕТ!

[Stilet]

Покажите хоть подобные программы.

Недавно попросили подобное сделать, вот можеш наработкой воспользоваться:

program Project1;

uses crt;

type PKvartira=^TKvartira;
     TKvartira=record
      Prev,next:PKvartira;
      Kolvo_Komnat,Etaj,Ploshad:integer;
      Adres:string[50];
     end;
var
        FirstItem,CurItem,LastItem:PKvartira;
{Добавляем элемент}
 procedure AddItem;
 begin
   new(curitem);
   with CurItem^ do begin
     Readln(Kolvo_Komnat,Etaj,Ploshad,Adres);
    Prev:=LastItem;
    next:=nil;
    LastItem^.next:=CurItem;
    LastItem:=CurItem;
   end;
 end;

{Выводим все на экран}
 procedure WriteItems; var i:PKvartira;
 begin
  i:=FirstItem;      writeln;
  writeln('Kolvo_Komnat,Etaj,Ploshad,Adres');
  while i<>nil do begin
   with i^ do  write(Kolvo_Komnat:10,Etaj:5,Ploshad:9,Adres);
   writeln;
   i:=i^.next;
  end;
 end;
begin
 new(firstitem);
  FirstItem^.Prev:=nil;
  FirstItem^.next:=nil;
  LastItem:=FirstItem;
   Writeln('Kolvo_Komnat,Etaj,Ploshad,Adres');
{Здесь каждый вызов AddItem просит ввода. Ввод элементов можно делать через пробел, после последнего нажать Энтер для красоты}

  AddItem;
  AddItem;


  WriteItems;
  readln;
  { TODO -oUser -cConsole Main : Insert code here }
end.

[Kobe]

Ну вот опять вставляю ваш код, нажимаю F9 а там file not found Crt.dcu

[OCTAGRAM]

Возможно, Graph и Crt есть для Delphi. Для FPC они точно есть, но FPC — это... это FPC

[DeKot]

Для поддеожки морального духа, что бы у Вас получилось для начала приложение в Дельфи - скачайте из http://www.programmersforum.ru/showthread.php?t=45082 вложение и затем просто проделайте все, что изложено во втором уроке до запуска первого приложения (нажать кн.F9).Получите на экране свою первую программу и потом постарайтесь досконально разобрать, что же Вы сотворили.Дальше пойдет легче.