6.4.. Napisati program za pretvaranje dolara u evre.

Opis rješenja: Odnos evra i dolara je E := D * 0.785731123.

Opis programa:

Listing programa:

PROGRAM p06411097; 
USES 
  WinCRT;
VAR
  D, E : Real;
BEGIN
  Write('Broj dolara');
  Readln(D);
  E := D * 0.785731123;
  Writeln('Broj Evra ', E);
END.

Ispis na ekranu:

Index