Valoarea lui y va fi y=48390.3
eu am aplicat acest algoritm si am elaborat un program pascal care va calcula valoare lui y:
program p1;
var x,y:real;
Begin
write('Dati x:');read(x);
y:=0;
while x<>0 do
begin
while x>9 do
begin
x:=x/10;
y:=y*10+x;
end;
write('X:');read(x);
end;
writeln('y este:',y);
readln;
End.