Napisz definicje klasy osoba i klasy pochodnej uczeń dobierz odpowiednie właściwości i metody

Rzepa zbłaźnił się niesamowicie. Jemu chodzi o klasy w PROGRAMOWANIU oczywiście. TOsoba = class imie:string; nazwisko:string; wiek:integer; wzrost:double; plec:string; homoseksualizm:boolean; LinkDoNk:string; function Jedz(Co:string); function Mysl(Oczym:string); end; TUczen = class(TOsoba) NrWDzienniku:integer; Klasa:string; Szkola:string; Oceny:array of integer; Uwagi:array of string; function ZglosNP(Przedmiot,Powod:string); function RobPraceDomowa(Przedmiot:string;IleSekund:integer); end; Ogolnie sa to 2 uproszczone modele ale zawierają dziedziczenie (inaczej TUczen przejmuje wszystkie wlasciwosci i metody klasy TOsoba). Napisane w języku Delphi ale nie sprecyzowałeś dokładnie języka a szablon jest prosty: TNazwaKlasy = class(ZCzegoDziedziczy) NazwaZmiennej : TypZmiennej; function NazwaFunkcji(ArgumentFunkcji:TypZmiennej);