Odp: Norbert odpowie ;)
uses crt,dos;
var
imie,nazwisko,miejzam:string;
rokurodzenia,wiek,numtel,gg:real;
dzien,rok,dzientygodnia,miesiac:word;
begin
getdate(rok,miesiac,dzien,dzientygodnia);
writeln('Podaj swoje imie:');
readln(imie);
writeln('Podaj swoje nazwisko:');
readln(nazwisko)...