Вывести фразу из модуля - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д