Kalkulačka Pascal
Napsal: sob 8. kvě 2010, 21:14
Ahoj všichni,
Při psaní kalkulačky v pascalu jsem narazil na jednu takovou chybu, která se týká desetinných míst.
Napsal jsem si další prográmek a zjistil že pascal si při zjistování desetiné části u čísla vymýšlí další náhodná...nebo blbě zaokrouhluje. To netuším. Přikládám zdroják.
Při psaní kalkulačky v pascalu jsem narazil na jednu takovou chybu, která se týká desetinných míst.
Napsal jsem si další prográmek a zjistil že pascal si při zjistování desetiné části u čísla vymýšlí další náhodná...nebo blbě zaokrouhluje. To netuším. Přikládám zdroják.
Kód: Vybrat vše
uses crt;
var a:real;
i:integer;
begin
clrscr;
read(a);
b:=a;
REPEAT
writeln(FRAC(B));
B:=b*10;
UNTIL FRAC(B)=0;
end;
end.