contoh:
program Latihan;
begin
write('Hello');
write('Hi');
readln;
end.
Program Latihan_2;
var
p:integer;
l:integer;
ls:integer;
begin
write('panjang=');readln(p)
write('lebar='):readln(l)
ls:=p*l
writeln('luas=',ls);
readln;
end.
program Latihan;
begin
write('Hello');
write('Hi');
readln;
end.
Program Latihan_2;
var
p:integer;
l:integer;
ls:integer;
begin
write('panjang=');readln(p)
write('lebar='):readln(l)
ls:=p*l
writeln('luas=',ls);
readln;
end.
0 komentar:
Posting Komentar