Na innym forum poradzili mi tak: Str(d:0:2,wynik); ;D I działa.... niby proste ale nigdy bym na to nie wpadł;P Dodano Dzisiaj, 14:13: A co mogę zmienić....w kodzie? Chodzi mi dokładnie o to,że gdy okręgi są na tej samej wysokości i są, np. styczne zewnętrznie to program działa prawidłowo i pokazuje,...

Niestety ale coś nie działa:/ Wyskakuje błąd na 0.01 Error: Incompatible types: got "Extended" expected" A liczbę x mam typu real; Dodano Dzisiaj, 10:51: Dodam, że chce tą liczbę d:=sqrt(sqr(x2-x1) + sqr(y2-y1)); zaokrąglić do dwóch miejsc po przecinku...oczywiście nie używając d:0:2 ...

program okregi; uses crt,graph,dos; const rm=50; rd=70; //staˆe - promienie okr©g˘w var sterownik,tryb : integer; x,y,xs,ys : integer; x1,y1,x2,y2 : integer; d : real; krok : byte; a,wynik,krok2 : string; znak : char; //--------------------------Procedury----------------...

Jak zaokrąglić liczbę do dwóch miejsc po przecinku, np. 7.00342340234234E+002 nie używając liczba:0:2 ?