6.4.. Izrańćunati dijalgonale d i D kocke (za poznatu stranicu a).

Opis rješenja: Na osnovu Pitagorine teoreme dijagonala se računa d2 = a2 + b2 odnosno D = d2 + a2 = a2 +a2 + a2 = 3a2 .

Opis programa:

Listing programa:

PROGRAM p06411087; 
USES 
  WinCRT;
VAR
  a, d, D: REAL;
BEGIN
  WRITELN('Stranica kocke');
  WRITE('a ');
  READLN(a);
  d:= a * SQRT(2);
  D:= a * SQRT(3);
  WRITELN('a=', a, ' d=', d, ' D=',D);
END.

Ispis na ekranu:

Index