tugas3_aplikasi apa saja yang bisa dibuat oleh pascal ~ Tulisan Tugas Mahasiswa Secara Otomatis

tugas3_aplikasi apa saja yang bisa dibuat oleh pascal

Top of Form

Bottom of Form

soal : aplikasi apa saja yang bisa dibuat oleh pascal ?

jawab :

1.Aplikasi Pengurut Bintang

Aplikasi Pengurut Bintang adalah aplikasi untuk mengurutkan dari satu bintang,dua bintang,tiga bintang,sampai jumlah bintang terakhir sesuai dengan jumlah yang kalian inginkan.

Skrip yang digunakan cukup sederhana

program bintang;

uses wincrt; {Saya pakai Turbo Pascal for Windows 1.5}

var a,b,c:integer; {Variabel a,b,c saya set ke integer}

begin

write('Masukkan Jumlah Bilangan..'); readln(c);

for a:=1 to c do

begin

for b:=1 to a do

write('*');

writeln;

end;

end.

2.Aplikasi Penentu Segitiga

Aplikasi ini digunakan untuk menentukan Jenis Segitiga yang ingin diketahui,dilihat dari panjang sisi A,sisi B,dan sisi C nya.

Sintaksnya mudah kok,silahkan dipelajari

program penentu_segitiga;

uses wincrt;

var a,b,c,i,j:integer;

begin

write('Masukkan Panjang Sisi A..'); readln(a);

write('Masukkan Panjang Sisi B..'); readln(b);

write('Masukkan Panjang Sisi C..'); readln(c);

i:=sqr(c);

j:=sqr(a) + sqr(b);

if (i<j) then

writeln('Segitiga Lancip')

else if (i=j) then

writeln('Segitiga Siku Siku')

else

writeln ('Segitiga Tumpul')

end.

Nama : maisy lestari astuti

nim : 201712028

Tulisan Tugas Mahasiswa Secara Otomatis

tugas3_aplikasi apa saja yang bisa dibuat oleh pascal

Related Post