program kata di pascal (PRAKTIKUM)

program kata;

var

   a,b,c:integer;

begin

      a:=10;

      b:=100;

      c:=1000;

      writeln('ISI A = ',a:5);

      writeln('ISI B = ',b:5);

      writeln('ISI C = ',c:5);

      readln;

end.

jika di run

ISI A =    10

ISI B =   100

ISI C =  1000

PRAKTIKUM program kata di pascal

program kata;

var

   a,b,c:integer;

begin

      a:=10;

      b:=100;

      c:=1000;

      writeln('ISI A = ',a);

      writeln('ISI B = ',b);

      writeln('ISI C = ',c);

      readln;

end.

JIKA di RUN maka :

ISI A = 10

ISI B = 100

ISI C = 1000

Program Kata pada Pascal

program kata;

var

a:integer;

b:real;

begin

a:=100;

b:=10;

b:=b+20;

writeln('ISI A = ',a);

writeln('ISI B = ',b:6:1);

readln;

end.

jika dijalankan maka :

A = 100

B= 30