Kali ini saya akan membagikan cara untuk Menentukan bilangan terbesar dengan pascal dengan menggunakan bahasa pemrograman pascal. Pada program ini menggunakan percabangan. semoga bisa menambah wawasan bagi para pembaca semuanya.
berikut source code nya :
program bilangangterbesar;uses crt;var bilangan1,bilangan2,bilangan3:integer; beginclrscr;writeln('masukan bilangan pertama ');readln(bilangan1);writeln('masukan bilangan kedua');readln(bilangan2);writeln('masukan bilangan ketiga');readln(bilangan3);if (bilangan1>bilangan2) and (bilangan1>bilangan3) thenwrite('bilangan pertama yang terbesar')elseif (bilangan2>bilangan1) and (bilangan2>bilangan3) thenwriteln('bilangan kedua yang terbesar')elseif (bilangan3>bilangan2) and (bilangan3>bilangan2) thenwriteln('bilangan ketiga yang terbesar');end.berikut screenshootnya :