Komentar

Jumat, 05 Juli 2013

While

Posted by M Habibie 19.46, under | No comments





var
 
kal: string;
 




begin
 
 while not eof(input) do
  begin
   readln(kal);
   writeln(kal);
  end;
 
end.

0 komentar:

Posting Komentar

Your Ip Address

Your IP Address

IP

Popular Post

Popular Posts

  • Hymne Titian Teras
    Kami putra jambi Siswa titian teras menjunjung tinggi citra pribadi, luhur Demi cita-cita Demi kemerdekaan Rela berkorban ...
  • Pandangan saya terhadap Pemilu 2014
    Dalam beberapa hari lagi kita (indonesia) akan melaksanakan yaitu pemilihan umum Presiden dan wakil presiden. akan tetapi sekarang ini ...
  • Floor And Ceiling
    var   floor , ceiling :  longint ;   n :  real   ;
  • Apa itu PHP dalam Bahasa Pemograman??
    PHP   adalah teknologi yang diperkenalkan tahun 1994 oleh Rasmus Lerdorf. Beberapa versi awal yang tidak dipublikasikan digunakan pada ...
  • For
    var jbil, i, jml, bil :  integer ;
  • A Tambah B
    var   A:  byte ;   B:  byte ;   C:  byte ; begin
  • POLA II
    var   n: byte ; j, i ,cnt:  byte ;  
  • Menebak Angka
    var tebakan ,  disimpan  :   byte ;
  • POLA I
    var   n: byte ; j, i :  byte ;  
  • IF THEN
    var   n: longint ;