Форум: "Потрепаться";
Текущий архив: 2002.07.15;
Скачать: [xml.tar.bz2];
ВнизПомогите новичку Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.012 c