INDONESIANWARE - Pada Artikel yang anda baca kali ini dengan judul Perulangan While do 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 While do di Turbo Pascal
link : Perulangan While do di Turbo Pascal

Perulangan While do di Turbo Pascal

Setelah beberapa jam yang lalu saya memposting tentang Perulangan For do di Turbo Pascal.
Kali ini saya akan memposting tentang Perulangan While do di Turbo Pascal.
Perulangan While do digunakan untuk melakukan proses perulangan statement terus menerus selama expresi pada while do bernilai True atau belum terpenuhi

Contoh Perulangan While do

program while_do;
uses crt;
var
	bil,x:integer;
begin
	clrscr;
	writeln('=================');
	writeln('Tutorial Koding');
	writeln('==================');
	write('Masukan sebuah bilangan : ');readln(bil);
	
	x:=1;
	while x <= bil do
	begin
		writeln('Tutorial Koding ',x);
		x:=x+1;
	end;
	
	readln;
end.

Jika dijalankan maka akan seperti gambar dibawah ini

Pada gambar di atas akan melakukan perulangan dari x samapi x kurang atua sama dengan bilangan yang ditentukan

Semoga berhasil
Semoga bermanfaat, jangan lupa berikan komentar anda pada postingan ini

Sekianlah artikel Perulangan While do 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 While do di Turbo Pascal dengan alamat link https://ware-id.blogspot.com/2014/03/perulangan-while-do-di-turbo-pascal.html