Program Pascal Menggunakan Perulangan For Next

Program Pascal Menggunakan Perulangan For Next

 Berikut adalah contoh Program Pascal Menggunakan Perulangan For Next

1. Program
program fornext;
uses crt;
var
   i:integer;
begin
     clrscr;
     for i:=1 to 10 do
     begin
     Writeln(i,'.STMIK BUDIDARMA');
     end;
     readln;
end.

2. Tampilan Program


Komentar

Posting Komentar

Postingan populer dari blog ini

Kalimat Deskriptif dan Pseudocode Mencari Luas Persegi Panjang

Kalimat Deskriptif dan Pseudocode Mencari Luas Persegi Panjang Kalimat Deskriptif Mulai Masukkan Nilai Panjang MAsukkan Nilai Lebar Hitung nilai Luas = Panjang* Lebar Tampilkan nilai Luas Selesai Pseudocode Start Variabel        Panjang  : Integer        Lebar    : integer        Luas     : integer Input       Read (Panjang)       Read (Lebar) Proses        Luas = Panjang*lebar Output       Write (Luas) End.
Baca selengkapnya

Kalimat Deskriptif dan Pseudocode Mencari Volume Tabung

Kalimat Deskriptif dan Pseudocode Mencari Volume Tabung Kalimat Deskriptif Mulai Masukkan nilai radius Masukkan nilai tinggi Hitung nilai volume = 3,14*radius*radius*tinggi Tampilkan nilai volume Selesai Pseudocode Start Variabel         Radius  : integer         Tinggi   : integer         Volume : real Input         Read (radius)         Read (Tinggi) Proses         Volume = 3,14*radius*radius*tinggi Output          Write (Volume) End.
Baca selengkapnya