Встречен конец файла, а ожидалось begin - PascalABC.NET
Формулировка задачи:
Установила среду pascalabc.net
Почитала http://www.pascal.helpov.net/index/o...al_programming и
http://www.pascal.helpov.net/index/pascal_modules_programming
Набрала примерчик,
запустила
дает Program16.pas(5) : Встречен конец файла, а ожидалось begin
поставила точку после end
Program16.pas(4) : Встречено '.', а ожидалось ';'
помогите, чтоб это заработало, turbo pascal я знаю.
зарание спасибо.
Решение задачи: «Встречен конец файла, а ожидалось begin»
textual
Листинг программы
program oop;
Type
tPredoc = object Name : string ; {поле данных объекта}
Procedure Declaration ; {объявление методов объекта}
Procedure MyName ;
end;
Procedure tPredoc.Declaration;{реализация метода объекта}
begin
writeln('I am the ancestor.');
end;
Procedure tPredoc.MyName ; {реализация метода объекта}
begin
writeln('I am - ', Name);
end;
var
v1: tPredoc ; {объявление экземпляра объекта}
begin
v1.Name := 'Bill Gates';
v1.Declaration;
v1.MyName;
readln;
end.
Объяснение кода листинга программы
- Объявлен тип данных tPredoc - это объект с полем данных Name типа строка и объявлением метода Declaration.
- Реализован метод Declaration для объекта tPredoc. Он выводит сообщение
I am the ancestor.. - Реализован метод MyName для объекта tPredoc. Он выводит сообщение
I am -с добавлением значения поля Name. - Объявлена переменная v1 типа tPredoc, которая является экземпляром объекта tPredoc.
- Значение поля Name для объекта v1 установлено в строку 'Bill Gates'.
- Вызван метод Declaration для объекта v1.
- Вызван метод MyName для объекта v1.
- Ввод с клавиатуры ожидается с помощью функции readln.
- Программа завершается.