Скачать: CL | DM;

Помогите новичку   Найти похожие ветки 

← →
Alex II ©   (2002-06-12 11:24) [0]

Вопрос от новичка.

Я пытаюсь изучить Delphi и объектный ПАСКАЛЬ. Купил книгу по Delphi 5. У самого на компьютере стоит Delphi 6.
Переписал с книги следующий код:

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils;

var x, y, z, integer,

begin
ReadLn(X, Y);
Z:=X+Y;
WriteLn (Z);
ReadLn { TODO -oUser -cConsole Main : Insert code here }

end.


После нажатия кнопки F9 выдается сообщение после слова begin

Что у меня не правильно? Можно ли вообще изучать Delphi 6 по книге о Delphi 5.

Подскажите, пожалуйста!
Лучше на E-mail: apm_2000@rambler.ru

---

← →
wicked ©   (2002-06-12 11:32) [1]

хм, это в книжке такой пример?... или ты так его набрал?...
вообще-то это должно было быть чего то вроде этого (исправления - жирным)

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils;

var x, y, z : integer ;

begin
ReadLn(X, Y);
Z:=X+Y;
WriteLn (Z);
ReadLn { TODO -oUser -cConsole Main : Insert code here }
end.

---

← →
wicked ©   (2002-06-12 11:33) [2]

хехе... и не видно их... ну да ладно, всего то - двоеточие после списка переменных и точка с запятой после integer...

---

← →
cyborg ©   (2002-06-12 11:44) [3]

Вообщето нужно так :-)

program Project2;

{$APPTYPE CONSOLE}

uses
SysUtils;

var x, y : integer;

begin
WriteLn("Enter X:");
ReadLn(X);
WriteLn("Enter Y:");
ReadLn(Y);
WriteLn(X+Y);
//Желатльно лишних переменных не втыкать в программу
//Только если ты будешь использовать эту сумму ещё где-то
//и неодин раз, то лучше использовать переменную
ReadLn;
end.


А то, что ты пытался прочитать ReadLn(X,Y);
здесь X должна быть файловая переменная!

---

← →
cyborg ©   (2002-06-12 11:45) [4]

wicked © вместо того, что бы насмехаться, лучше бы сам подучился!

---

← →
cyborg ©   (2002-06-12 11:59) [5]

Упс, извиняюсь, всё правильно было :-), просто думал о другом

---

← →
Alex II ©   (2002-06-12 13:21) [6]

Спасибо всем кто откликнулся - у меня получилось!

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.013 c