Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.07.15;
Скачать: 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 вся ветка

Текущий архив: 2002.07.15;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.022 c
1-47537
Gamar
2002-06-27 11:25
2002.07.15
Как определить существует ли папка


3-47202
MWM
2002-06-19 18:36
2002.07.15
Редактирование таблицы DBGrid


3-47157
Hermit
2002-06-18 17:03
2002.07.15
SET EXPLAIN ON


14-47676
AFROLOV
2002-06-17 10:59
2002.07.15
Длинная арифметика


4-47910
stainer a
2002-05-10 08:00
2002.07.15
сообщение em_settextex