INDONESIANWARE - Pada Artikel yang anda baca kali ini dengan judul Perulangan Repeat Until di Turbo Pascal, kami telah mempersiapkan artikel ini dengan baik untuk anda baca dan ambil informasi didalamnya. mudah-mudahan isi postingan Artikel Turbo Pascal, yang kami tulis ini dapat anda pahami. baiklah, selamat membaca.

Judul : Perulangan Repeat Until di Turbo Pascal
link : Perulangan Repeat Until di Turbo Pascal

Perulangan Repeat Until di Turbo Pascal

Pada postingan kali ini saya akan membahas Perulangan Repeat Until di Turbo Pascal
Sebenarnya perulangan ini hampir sama dengan Perulangan While do di Turbo Pascal namun ada beberapa perbedaan antara repeat dan while,jika repeat iya akan menjalankan perintah yang akan diulang lalu mengeceknya, jika nilainya benar/true maka perulangan tersebut akan berhenti,namun jika masih salah/false maka akan terus melakukan perulangan sampai nilai itu benar/true

Contoh Perulangan Repeat Until di Turbo Pascal

1. Buka turbo  pascal yang anda punya

2. Ketikan script dibawah ini

program repeat_until;
uses crt;
var
 i,jumlah:integer;
begin
 clrscr;
 writeln('==================');
 writeln('Tutorial Koding');
 writeln('==================');
 writeln('');

 i:=1;
 write('Masukan Jumlah Perulangan : ');readln(jumlah);
 repeat
  writeln('Tutorial Koding ',i);
 until i > jumlah;
 
 readln;
end.

Jika dijalankan maka akan seperti gambar dibawah ini

Penjelasan :

var
 i,jumlah:integer;

Mendeklarasikan variable i dan jumlah sebagai integer

i:=1;
 write('Masukan Jumlah Perulangan : ');readln(jumlah);
 repeat
  writeln('Tutorial Koding ',i);
 until i > jumlah;

Mengisi variable i dengan 1, lalu mengisi variable jumlah sesuai dengan jumlah yang kita inputkan
lalu melakukan perulangan sampai isi dari variable i lebih dari variable jumlah

Itulah penjelasan singkat dari saya
semoga berhasil

Sekianlah artikel Perulangan Repeat Until di Turbo Pascal kali ini, mudah-mudahan bisa memberi manfaat untuk anda semua. baiklah, sampai jumpa di postingan artikel lainnya.

Anda sekarang membaca artikel Perulangan Repeat Until di Turbo Pascal dengan alamat link https://ware-id.blogspot.com/2014/03/perulangan-repeat-until-di-turbo-pascal.html