blastopf.blogg.se

Contoh: If B0 Then Begin H:=A/B WriteLn WriteLn('Harga H = ',H:13:2) End Else Begin WriteLn WriteLn('Harga H Imajiner.' ) WriteLn('Harga B tidak boleh NOL.' ) WriteLn('Silahkan coba lagi.' ) End Tingkat 5.A _ If (Syarat1) Or (Syarat2) Then Begin (yang dilakukan saat salah satu syarat terpenuhi) (.) End Else Begin (yang dilakukan saat kedua syarat tidak terpenuhi) (.) End Keterangan: Pernyataan Logika yang jika salah satu syaratnya terpenuhi, akan dikerjakan beberapa perintah. Jika syarat tidak terpenuhi, akan dikerjakan beberapa perintah lainnya. Contoh: If B0 Then Begin H:=A/B WriteLn WriteLn('Harga H = ',H:13:2) End Else WriteLn('Harga H Imajiner.' ) Tingkat 4 _ If (Syarat) Then Begin (yang dilakukan saat syarat terpenuhi) (.) End Else Begin (yang dilakukan saat syarat tidak terpenuhi) (.) End Keterangan: Pernyataan Logika yang jika syaratnya terpenuhi, akan dikerjakan beberapa perintah. Jika syarat tidak terpenuhi, akan dikerjakan satu perintah lainnya.

) Else WriteLn('Anda belum beruntung.' ) Tingkat 3 _ If (Syarat) Then Begin (yang dilakukan saat syarat terpenuhi) (.) End Else (yang dilakukan saat syarat tidak terpenuhi) Keterangan: Pernyataan Logika yang jika syaratnya terpenuhi, akan dikerjakan beberapa perintah.

) Tingkat 2 _ If (Syarat) Then (yang dilakukan saat syarat terpenuhi) Else (yang dilakukan saat syarat tidak terpenuhi) Keterangan: Pernyataan Logika yang jika syaratnya terpenuhi, akan dikerjakan satu perintah. This process was less resource-intensive than the later (IDE).Ĭontoh: If A:=10 Then WriteLn('Selamat. Lazarus is a free and open source development tool for the Free Pascal. Pointer sind nicht nur in C sondcrn auch in PASCAL der.

Bill Buckels notes that Willi Kusche is working in Apple CP/M with Turbo Pascal. PDF: Netware Printer Definition File: PDF. Acrobat Portable Document Format (Adobe) PDF.

Jika syarat tidak terpenuhi, tidak dikerjakan sesuatu. Tingkat 1 _ If (Syarat) Then (yang dilakukan saat syarat terpenuhi) Keterangan: Pernyataan Logika yang jika syaratnya terpenuhi, akan dikerjakan satu perintah.