Langsung ke konten utama

MENCARI RATA RATA PENJUALAN DALAM PROGRAM PASCAL

Program RataRataPenjualan;
uses crt;
var
  ph1,ph2,ph3,ph4,ph5,rr:real;
begin
  clrscr;
  writeln('Program Mencari Rata Rata Penjualan');
  write('Input Penjualan Hari 1 =');readln (ph1);
  write('Input Penjualan Hari 2 =');readln (ph2);
  write('Input Penjualan Hari 3 =');readln (ph3);
  write('Input Penjualan Hari 4 =');readln (ph4);
  write('Input Penjualan Hari 5 =');readln (ph5);

  rrp :=(ph1+ph2+ph3+ph4+ph5)/5;
  writeln('Rata Rata Penjualan =',rrp:0:0);
  readln;
end.

Komentar

Posting Komentar

Postingan populer dari blog ini

sajian data dalam bentuk histogram, poligon, pie chart, ogive dan diagram

selesaikan data dibawah ini dengan sajian dalam bentuk histogram, poligon, pie chart, ogive, dan diagram nilai f 41 - 50 3 51 – 60 11 61 – 70 21 71 – 80 33 81 – 90 15 91 – 100 3 1. Histogram Untuk membuat histogram tepi bawah dikurang dengan 0.5 dan batas atas kelas paling bawah di tambah dengan 0.5 2. Poligon Poligon merupakan garis yang melalui titik tengah dari bagian sisi atas tiap persegi panjang dari histogram   3. Ogive Untuk menentukan ogive terlebih dahulu mencari nilai frekuensi komulatif  Nilai Frekuensi FK 41-50 3 3 51-60 11 14 61-70 21 35 71-80 33 68 81-90 15 83 91-100 3 86 4. diagram    ...
Posting Komentar
Baca selengkapnya

MENGHITUNG LUAS LAYANG LAYANG

KALIMAT DESKRIPTIF mulai masukan nilai d1 masukan nilai d1 hitung nilai luas= 1/2*d1*d2 tampilkan nilai luas selesai PSEUDO-CODE start variabel    d1 : integer    d2 : integer    luas : real input    read (d1)    read (d2) proses    luas= 1/2*d1*d2 output    write (luas) end.
Posting Komentar
Baca selengkapnya