Вывести фразу из модуля - Free Pascal
Формулировка задачи:
модуль компилируется вот его код
а это код основной проги через нее
нужно вывести слово 'Hello'
unit ATD;
interface
type
slovo = object
procedure names;
implementation
procedure slovo.names;
begin
writeln(' Hello ');
end;
end.program A; uses ATD; begin slovo.names;//в этой строке компилятор выдает "неправильное выражение" end.
Решение задачи: «Вывести фразу из модуля»
textual
Листинг программы
unit ATD;
interface
type
slovo = object
procedure names;
end; // Этого не было
implementation
procedure slovo.names;
begin
writeln(' Hello ');
end;
end.
Объяснение кода листинга программы
- Объявлен модуль с именем ATD
- В интерфейсе объявлен тип данных slovo
- В реализации процедуры names из объекта slovo
- Выводится фраза
Hello