Page 44 - Pemrograman Dasar kelas X
P. 44

40          Pemrograman Dasar SMK Kelas X Sem 2

                     Jawab:
                     ..............................................................................................................................................

                     ..............................................................................................................................................
                     ..............................................................................................................................................
                     ..............................................................................................................................................

                     ..............................................................................................................................................
                     ..............................................................................................................................................

                     ..............................................................................................................................................
                     ..............................................................................................................................................
                     ..............................................................................................................................................
                     ..............................................................................................................................................

                 2.  Lihat kembali kode program pada Contoh 1
                        Program Latihan1;

                        Uses crt;
                        Var a: String[30];
                            b : Integer;

                            c: String[3];
                        Begin

                            Clrscr;
                            Write(‘Masukan Nama:’);
                            Readln(a);

                            Write(‘Masukan Umur:’);
                            Readln(b);

                            Write(‘Masukan Pendidikan Terakhir:’);
                            Readln(c);
                            Write(‘Nama Saya’,a, ‘Umur Saya’,b, ‘Pendidikan Terakhir:’,c);

                            Readln;
                        End.




                     a.  Salin kode program di atas ke dalam Free Pascal, kemudian ganti write diganti dengan
                        writeln. Tuliskan bagaimana outputnya!

                     b.  Jelaskan   apa   perbedaanya  dibandingkan dengan menggunakan perintah write
                        saja,manakah yang lebih sesuai?

                     Jawab
                     ..............................................................................................................................................
                     ..............................................................................................................................................

                     ..............................................................................................................................................
   39   40   41   42   43   44   45   46   47   48   49