Hogy lehet azt pascalban megcsinálni hogy a tizedes jegynél a pont helyett a vesszőt fogadja el? Ha lehet programba kérem

Dolgozd fel kézzel a számot!

Formája: a,b. Az a egyszerű, az az egész rész. Vedd a b hosszát, legyen l. Kiszámolod a b*10^(-1*l) értéket, ez lesz a tizedes tört rész, ezt hívjuk c-nek.

A kapott szám pedig az a+c lesz.

Vagy a bekérés után kicseréled a vesszőt pontra, és úgy alakítod számmá.

Karakter csere, pl.:

procedure comma2point(var str : String);

begin

str[Pos(',',str)]:='.';

end;

Beolvasod a számot stringként, majd kettészeded a vesszőnél. A két részt külön egész számmá alakítod, majd kiszámítod belőle a törtet:

A törtrészt beteszed egy lebegőpontos számba, és addig osztod 10-zel, amíg 1-nél kisebb nem lesz. Ekkor kijössz a ciklusból, hozzáadod az egészrészt, és kész.