var
x:string;
y:string[5];
begin
x:='struktur data';
y:='struktur data';
writeln(x);
writeln(y);
writeln(length(x));
writeln(length(y));
writeln(x+y);
readln;
{ TODO -oUser -cConsole Main : Insert code here }
end.
Welcome to my blog
Senang bisa membantu kalian semua
dan Semoga tulisan saya bermanfaat,
Sekenannya komentar anda supaya saya bisa
mengerti apa yang di dapatkan oleh pembaca
Welcome to my blog
Senang bisa membantu kalian semua
dan Semoga tulisan saya bermanfaat,
Sekenannya komentar anda supaya saya bisa
mengerti apa yang di dapatkan oleh pembaca
var
x:string;
y:string[5];
begin
x:='struktur data';
y:='struktur data';
writeln(x);
writeln(y);
writeln(length(x));
writeln(length(y));
writeln(x+y);
readln;
{ TODO -oUser -cConsole Main : Insert code here }
end.
0 komentar:
Posting Komentar