Postingan

tugas Ganjil,Genap dan Discount

Gambar
1. Ganjil    Berikut ini Script Menghitung Nilai Akhir :          berikut adalah hasil dari hasil script di atas : 2. Genap    berikut adalah script dari mencari usia sekarang  berikut adalah hasil dari script di atas :  3. diskon     berikut ini adalah script dari program diskon   berikut adalah hasil dari script di atas :

Algoritma dan flowchart data mahasiswa

Gambar
Algoritma Mulai Masukan Nama Mahasiswa,NIM,Alamat,Jurusan,Jenjang,dan SPP Tampilkan Nama Mahasiswa,NIM,Alamat,Jurusan,Jenjang dan SPP Selesai

latihan 2 Penjumlahan,Menghitung Luas Permukaan Bola,Mencari Luas Dan Keliling Lingkaran,Menghitung Volume Tabung,Menghitung luas Segitiga

Gambar
1.        Penjumlahan Oke jadi saya akan mencoba menjumlah dengan pascal,seperti menambah,mengurang,membagi dan mengkali bilangan,script yang akan saya gunakan yaitu: Program menghitung_bilangan; Uses crt; Var a,b,kali,tambah,kurang:integer;        Bagi:real; Begin Clrscr;                 write (‘Masukan Jumlah A:’);readln(A);                 write (‘Masukan Jumlah B:’);readln(B);                 kali:=A*B;                 tambah:=A+B;                 kurang:=A-B;        ...
Gambar
  Pengertian Input&Ou put Apa itu input & Output? Dalam bahasa Pascal pernyataan input adalah pernyataan yang digunakan untuk memasukkan data. Pernyataan input yang ada di Pascal adalah READ dan READLN. Sedangkan pernyataan output adalah pernyataan yang digunakan untuk menampilkan hasil. Ada dua pernyataan output yaitu WRITE dan WRITELN. Berikut ini contoh program Pascal tentang cara melakukan input nama dan NRP (nomor induk mahasiswa). *.Contoh: program nama_nrp; uses wincrt; var nama: char; nrp: longint; begin write('Nama : '); readln(nama);  write('NRP  : '); readln(nrp); end. Latihan  1 Oke jadi disini saya akan memperlihatkan salah satu percobaan latihan saya Jadi disini saya akan membuat sebuah Program Biodata menggunakan pascal,Pseudo Codenya Akan terlihat seperti ini: Program Biodata; Uses crt; Var       Nama,NIM,Alamat:string; Begin clrscr;   ...