| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Класс human - помогите пожалуйста доработать [D7]
Nostalgia © (2009-12-04 22:38:00)нужно описать класс human, который используется для хранения фамилии, года рождения человека, и содержит методы получения значения года рождения, вычисления возраста. Вызовите 3 метода(включая конструктор).
вот что получилось:
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
human=class
familia:string;
god_rozhdenia:1970..2009;
Constructor Create;
function GetGod_rozhdenia:1970..2009;
end;
var
Form1: TForm1;
implementation
{$R *.dfm}
end.
Подскажите пожалуйста как найти год рождения и возраст? Как это реализовать в процедуры и функции? Может быть у кого то когда то было похожее задание? Напишите пример если есть.
Palladin (2009-12-04 22:59:00) [1]Спасение утопающих - дело рук (глаз и серого вещества в полости черепа) самих утопающих.
KilkennyCat (2009-12-04 22:49:00) [2]Похоже, опять сезон сессий и дипломов?
Nostalgia, я решу твою задачу, если пообещаешь никогда не работать программистом.
Сергей М. (2009-12-04 22:46:00) [3]Ты этот код откуда взяла ?
| |
