PROGRAM MENCARI BILANGAN TERBESAR MENGGUNAKAN BAHASA PEMROGRAMAN PASCAL 7.1

PROGRAM CARI_BILANGAN_TERBESAR; USES CRT; VAR A,B,C:INTEGER; BEGIN CLRSCR; WRITE('BILANGAN 1 : ');READLN(A); WRITE('BILANGAN 2 : ');READLN(B); WRITE('BILANGAN 3 : ');READLN(C); IF (A=B) AND (B=C) AND (A=C) THEN WRITE('BILANGAN TERBESAR : ',A) ELSE IF (A=B) AND (A>C) THEN WRITE(A) ELSE IF (B=C) AND (B>A)...

Read More