Как записать программу в VBA которой в блоке ввода данных будет вводиться фамилия и имя , а блоке вывода фраза " Приветствую Фамилия Имя". Где вместо фамилии и имени введение данные.

Var
fam,name,otch:string;
begin
write(Введите фамилию -gt; );
readln(fam);
write(Введите имя -gt; );
readln(name);
write(Введите отчество -gt; );
readln(otch);
writeln(Ваше Фамилия И. О. = ,fam, ,name[1],.,otch[1],.);
readln;
end.