Minggu, 07 Oktober 2012

bahasa pascal 01


program program1_penjumlahan_dua_bilangan;
uses crt;
     var a,b,c:integer;

     begin
          clrscr;
          a:=0;
          b:=0;
          c:=0;

          a:=5;
          b:=10;

          write('masukkan nilai a :');readln(a);
          write('masukkan nilai b :');readln(b);

          c:=a+b;

          writeln('nilai adalah:',a);
          writeln('nilai adalah:',b);
          writeln('nilai adalah:',c);
          readln;
          end.

Tidak ada komentar:

Posting Komentar