Contoh 1
Program pelajar;
uses wincrt;
var
hasil:integer;
begin
hasil:=5+3;
writeln(hasil);
end.
Contoh 2
Program pelajar;
uses wincrt;
var
hasil:real;
begin
hasil:=22/7;
writeln(hasil);
end.
Contoh 3
Program pelajar;
uses wincrt;
var
A, B, hasil:real;
begin
A:=3;
B:=45;
hasil:= A/B;
writeln(hasil);
end.
Bandingkan programnya...
Tidak ada komentar:
Posting Komentar