Articles Comments

Belajar Untuk Berbagi » Pascal » Penggunaan If then Else, Pascal

Penggunaan If then Else, Pascal

Penggunaan kondisi bersyarat dalam PASCAL, If then Else

Simpan file dibawah ini dengan nama kondisi.pas

program kondisi;
uses crt;
var nilai:real;
var nama:string;
begin
clrscr;
write(‘Masukkan nama anda : ‘);readln(nama);
write(‘Masukkan nilai FISIKA anda : ‘);readln(nilai);
writeln(‘===========================================’);
writeln(‘Nama anda adalah ‘,nama);
if  (nilai > 0) and (nilai <= 74) then
writeln(‘Anda tidak lulus FISIKA dengan nilai’,nilai:2:0)
else if (nilai >= 75) and (nilai <= 100) then
writeln(‘Anda lulus FISIKA dengan nilai lebih dari KKM’)
else
writeln(‘Input anda salah’);
readln
end.

Maka setelah file diatas disimpan dengan nama kondisi.pas maka hasilnya sebagai berikut jika dijalankan (run)

Mau Lihat Lebih...
Mau Lihat Lebih...

Filed under: Pascal · Tags:

Leave a Reply

*

*

You might also likeclose