6.2.. Napisati program za izracunavanje izraza: 2x, a / 3.

Listing programa:

PROGRAM P06411022;
USES 
  WinCRT;
VAR              { deklarisanje promjenljivih }
  x, y : REAL;   { realne promjenljive }
BEGIN
  WRITELN('Izraz');            { naslov }
  WRITE('Brojevi: x a ');    { ulazne promjenljive }
  READLN(x, a);              { ulaz - ucitavanje promjenljivih }
  
  WRITELN('2*x =', 2 * x );    { izlaz - ispis }
  WRITELN('a/3 =' a / 3  );
END.

Ispis na ekranu:

Index