6.4.. Sabrati dva generisana dvocifrena slucajna broja.

Opis rješenja: Dvocifren broj se dobija izrazom: trunc((100-10) * random + 10);. (Vidi >>)

Opis programa:

Listing programa:

PROGRAM P06421110;
USES
  WinCrt;
VAR
  broj1, broj2, s : Integer;

BEGIN
  Randomize;
  broj1 := trunc((100-10) * random + 10);
  broj2 := trunc((100-10) * random + 10);
  s := broj1 + broj2;
  Writeln (broj1, ' + ', broj2, ' = ', s );
END.

Ispis na ekranu:

Index