Program_BilTerbesar
Var
a, b, c: Integer;
Begin
IF a>b and a>c then
Writeln("a Bilangan Terbesar");
Else
IF b>a and b>c then
Writeln("b Bilangan Terbesar");
Else
Writeln("c Bilangan Terbesar");
End;
End.
Tidak ada komentar:
Posting Komentar