Oke deh...seperti dalam judul artikel kita kali ini Menghitung Nilai Terbesar dari 3 Variabel di Pascal, sekarang kita coba membuat program sederhana di pascal...
Dalam pemrograman kali ini, nama dari program yang akan kita buat adalah bilangan_terbesar. Variabel yang kita butuhkan ada 3 buah, kita asumsikan variabel x, y, dan z saja, agar lebih mudah diingat.
Untuk lebih jelasnya, kita coba ketikkan listing program berikut:
program bilangan_terbesar;
uses wincrt;
var
x,y,z : integer;
begin
writeln('***************************');
writeln('Menghitung Nilai Terbesar');
writeln('***************************');
write('Masukan angka pertama : ');readln(x);
write('Masukan angka kedua : ');readln(y);
write('Masukan angka ketiga : ');readln(z);
writeln;
if (x > y) and (x > z) then
writeln(x,' adalah nilai terbesar ')
else
if (y > x) and (y > z) then
writeln(y,' adalah nilai terbesar ')
else
if (z > x) and (z> y) then
writeln(z,' adalah nilai terbesar');
end.
Setelah selesai kita mengetikkan program tersebut, baru dapat kita jalankan dengan menekan tombol run atau kombinasi ctrl+F9. Maka tampilannya adalah sebagai berikut:
Selamat mencoba :-)
Free Template Blogger collection template Hot Deals BERITA_wongANteng SEO
0 komentar:
Posting Komentar