Program repeat until

program repeat_until;
uses wincrt;
Var
I:integer;
begin
writeln('bilangan bulat kurang dari 20:');
I:=0;
repeat
I:=i+1;
write('bilangan ke-');
writeln(I);
until I=20;
end.

Artikel Menarik Lainnya

Pengertian Array Record Beserta Contoh ProgramnyaArray adalah sekumpulan variabel yang memiliki tipe data yang sama dan dinyatakan dengan nama yang
sofware update hari nie by mas didin........ 15 Dec 13 - McAfee Labs Stinger 12.1.0.695 14 Dec 13 - XnView v2.13 13 Dec 13 - Winamp 5.666 Ful
contoh Membuat program kalkulator menggunakan turbo pascalMendengar kata kalkulator di dalam fikiran pembaca mungkin adalah semacam alat hitung untuk menghit
Pembuatan Program Perkalian Matriks Ordo 3x3 Menggunakan Aplikasi Turbo PascalMendengar kata matriks kita pasti tahu kita bisa mempelajari hal itu di saat kita duduk di bangku S
Membuat Program Kasir Dengan Visual Basic By Mas Didin ali ini saya akan berbagi bagaimana cara membuat sendiri aplikasi kasir dengan menggunakan visual
Konversi Bilangan dengan C++ by mas didin Setelah beberapa hari kemarin saya sharing tentang Konversi Bilangan Desimal ke Biner&