6.4.. Izračunati vrijednosti prema izrazima:
  a = x * y
  b = x + y
  c = b / x

Opis rješenja:

Opis programa:

Listing programa:

PROGRAM p06411093; 
VAR
  x,y, a, b, c : Real;
BEGIN
  Write('Dva broja');
  Readln(x,y);
   a := x * y;
   b := x + y;
   c := b / x;
  Writeln('x= ', x, '  y= ', y);
  Writeln('a= ', a, '  b= ', b, '  c= ', c);
  READLN;
END.

Ispis na ekranu:

Index