Program Algoritma

program masukkan_sembarang_character;
uses wincrt;

var
n:char;

begin
write('masukkan nilai n:');readln(n);       
writeln(n);
end.