Program untuk menampilkan nama

Program nama;
Var nama: string;
begin
nama := "Elysa";
write ("nama:", nama);
write (nama);
end.

output:
nama: Elysa