Компилирует без ошибок,но...

[AlphaBlend]

Квадрат - это большой квадратище . А квадратик - это маленький квадрат ( маленький квадратище )

Добавлено спустя 1 минуту 52 секунды:
до пятой страницы была четрветая страница . До четвертой - третья . До третьей - вторая .... До первой страницы у молодого человека было занятие , где ему дали такое задание . До занятия были другие занятия , но они начались тогда , когда парень поступил учиться. До этого парень закончил школу . До того , как закончить школу - он в нее пошел .... и так далее

[resident]

а с пирамидой траблы...

Еще бы, где вы вычисляете fapothem? Это поле при создании инициализируется нулем, я уже грил. И так нулем у вас и существует.

Код: Выделить всё

property Apothem : real read fapothem write fapothem;

Не надо писать writе..., у вас свойство только для чтения, поэтому только read оставьте.

И вобще тут подводный косяк, который может быть вы поймете когда начнете в класс впихивать вычисление поля. Ну да ладно. Сразу подсказка: Представьте, что переменной fapothem у вас не будет. Значение свойства Apothem будет вычисляться как результат функции GetApothem, аналогично как устроены свойства on_get_perimetr и on_get_area. И в вычислении площади пирамиды будете использовать уже GetApothem вместо fapothem.
Примерное изменение:

Код: Выделить всё

   Tpyramid = class(Tsquare)
    fheight : integer;
    function GetApothem: real; // *** Замена поля на функцию ***
    function get_area : real;
  public
    constructor Create;
    destructor Destroy; override;
    property Height  : integer read fheight write fheight;
    property Apothem : real read GetApothem; // *** Только чтение результата функции ***
    property Area    : real read get_area;
  end;

Добавлено спустя 6 минут 5 секунд:

До этого парень закончил школу . До того , как закончить школу - он в нее пошел .... и так далее

Да, да, да. В итоге или тут начале - Человек произошел от обезъяны

[AlphaBlend]

сначала был Большой взрыв . Потом обезьяне начались ...

Добавлено спустя 20 секунд:
зафлудили тему ...

[Bombucho]

AlphaBlend и?
уж прежде чем сетовать на орф. ошибку дайте свой полный листинг...
Bombucho запакуйте ваше деяние и выложите.... проект, архивом . Посмотрю. Не то что вы как код вылаживаете. А именно проект.

А если файл превышает допустимый размер?

[AlphaBlend]

на файлообменник выложите и ссылочку дайте

[Bombucho]

на файлообменник выложите и ссылочку дайте

Спасибо

Добавлено спустя 2 минуты 1 секунду:

pupsik
постоялец
 
Сообщения: 495
Зарегистрирован: 20.08.2014 16:20:13

Вот ссылка на скачивания, ничего не переделывал, пока все так оставил
http://files.d-lan.dp.ua/download?file=6c87f0d4e98fda8caea72afa15c4bdd9

[pupsik]

пока вы выложили...
В общем: содрал со скрина.

Добавлено спустя 1 минуту 43 секунды:

... До того , как закончить школу - он в нее пошел .... и так далее

э..э вы о своём бытиЁ рассказываете?

[AlphaBlend]

pupsik j о бытие Bombucho

[pupsik]

Ваше...

Добавлено спустя 3 минуты 42 секунды:
Учтите: нет проверки правильности апофемы. Т.е., предположим она всегда правильная. Иначе необходимо проводить дополнительные расчеты. Т.е. узнать: входит ли ваша апофема в возможные диапазоны. И т.д.
В общем всё по простому. Есть два класса. Один - наследует. Ну и очень "идеальные" данные.
Плюс, надеюсь, более/менее понятно что и зачем...

п.с.

pupsik j о бытие Bombucho

а вы его лично знаете, или телепат?

[AlphaBlend]

а вы его лично знаете, или телепат?

ой все

[pupsik]

ой все

тю..ю....
Когда фул версию покажете (свою)? А то что то интересно взглянуть на ваше

это большой квадратище

[Bombucho]

Учтите: нет проверки правильности апофемы. Т.е., предположим она всегда правильная. Иначе необходимо проводить дополнительные расчеты. Т.е. узнать: входит ли ваша апофема в возможные диапазоны. И т.д.
В общем всё по простому. Есть два класса. Один - наследует. Ну и очень "идеальные" данные.
Плюс, надеюсь, более/менее понятно что и зачем...

Спасибо вам большое, в такие моменты ты понимаешь насколько ты плох, когда решение проблемы оказалось
замена Height на Apothem...

[resident]

а вот самого понимания предмета нет, иногда даже задумываюсь, а может это не мое...

Вы лично хоть одного живого программиста нестудента видели, чтобы показать на него пальцем и сказать "Я хочу быть таким как он и делать тоже что он с утра до вечера!"?
Я не видел, зато я видел много людей других профессий, которым не то что завидую, но считаю, что они хорошо устроились. И прикол в том, что зарплаты в общем сравнимы с программистами.

[Bombucho]

Вы лично хоть одного живого программиста нестудента видели, чтобы показать на него пальцем и сказать "Я хочу быть таким как он и делать тоже что он с утра до вечера!"?
Я не видел, зато я видел много людей других профессий, которым не то что завидую, но считаю, что они хорошо устроились. И прикол в том, что зарплаты в общем сравнимы с программистами.

Ну что ж, надеюсь мое дело найдет меня

[pupsik]

Как бы: http://lazarus-ccr.sourceforge.net/fpcdoc/ref/refsu25.html
Или этого не надо?

Добавлено спустя 23 минуты 50 секунд:
Хотя, по идее, не нужно.

Полиморфизм — это возможность использовать одинаковые имена для методов, входящих в различные классы

Т.е. и в раннем варианте get_area более/менее был. Во втором - кажись он явно виден.