Perintah With..Do dalam Pascal

Jul 25, 2009 No Comments by Sahabat

With..Do adalah perintah untuk memasukkan sekelompok data kedalam sebuah variable. Pada umumnya perintah ini digunakan untuk memasukkan data – data kedalam sebuah file bertipe (type file).
Contoh program:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
Uses wincrt;
Type
  Saya = record
  Nama : string [15];
  Umur : byte;
  Alamat : string [20];
End;
 
Var  DataSaya : saya;
Begin
  Clrscr ;
  With DataSaya do
  Begin
    Write ('ketik nama:');readln ( nama );
    Write ('ketik umur:');readln (umur );
    Write ('ketik alamat:');readln (alamat );
    Clrscr;
    Writeln ('selanjutnya data yang sudah dapat');
    Writeln ('disimpan kedalam sebuah record ');
    Writeln;
    Writeln ('nama :',nama);
    Writeln ('umur :',umur);
    Writeln ('alamat :',alamat);
    Readln;
    End;
End.

Kata Kunci

with do pada pascal, contoh program record menggunakan statement with, kegunaan statement do di pascal, pengertian for to do dalam pascal, pengertian statement with dalam record, penggunaan with do pada pascal, with do dalam pascal.

Pascal
Sahabat

Tentang Penulis

Penulis adalah sahabat-sahabat yg menyumbang tulisan di nusinau.com untuk dimuat dengan bijaksana. Silakan kirim tulisannya ke nusinau[at]gmail[dot]com atau ke admin[at]nusinau[dot]com. Butuh diskusi cepat? colek di twitter @nusinau
No Responses to “Perintah With..Do dalam Pascal”

Leave a Reply

You must be logged in to post a comment.