bbxtumblr

Masih dengan tugas komputer saya haha jangan bosan ya jadi hari ini mau ngeposting tugas lagi. Jadi kita nulis ini di Turbo Pascal:

Program Kosntanta_numeric_integer;
Uses Crt;
Const
         c1  =197;                     {byte}
         c2  =-2;                        {shortInt}
         c3  =1050;                    {Integer}
         c4  =50678;                  {word}
         c5  =3000000;              {LongInt}
Begin
         Clrscr;
         Writeln(‘Bilangan byte     =’,c1:4);
         Writeln(‘Bilangan shortInt     =’,c2:4);
         Writeln(‘Bilangan Integer     =’,c3:4);
         Writeln(‘Bilangan word     =’,c4:5);
         Writeln(‘Bilangan LongInt     =’,c5:7);
         Readln
End.

Habis itu kujalanin ternyata error haha kasian. Terus Pak Naryonya dateng buat diliatin ternyata aku salahnya ditulisan ‘Writeln’ kutulis jadi ‘Wrteln’ kalo gak salah. Terus setelah dibenerin hasil programnya:

Bilangan byte          = 197
Bilangan shortInt     =   -2
Bilangan Integer      =1050
Bilangan word         =50678
Bilangan LongInt     =3000000

Selesai…