program imiu;
var
imie:string;

BEGIN
writeln('Jak masz na imie?');
read(imie);
writeln('Witaj,',imie);
writeln('Milego dnia :)');
readln;
END.