Нет перегруженной программы с такими типами параметров.
Вот код:
//FirstProgramm
type
Human=class
public
Name: string;
Age: string;
Height: string;
end;
var
H:Human;
begin
h:=new Human;
write('Привет, как тебя зовут:');
readln(h.Name);
write('Здорово ' , h.Name,', а скажи-ка сколько тебе лет:');
readln(h.Age);
if (h.Age>18) then
writeln('Здорово ты уже совершеннолетний!')
else
writeln('Ой! Да ты ещё совсем мал.');
write('Окей, а какой же твой рост (см) :');
readln(h.Height);
writeln('Вот результаты. Твоё имя - ', h.Name , ', тебе ' , h.Age ,' лет, а рост - ', h.Height ,'см');
end.