Ответ:
по-моему не чего не выйдет если нажать в клавишу Enter
В строчках, в которых Вы вычисляете y1 есть явная ошибка - скобок не хватает, а некоторые скобки можно, наоборот, убрать:
Вместо y1:=((1/3)*(2*y0+x/y0*y0))
надо написать y1:=(2*y0+x/(y0*y0))/3
Математическая логика - алгоритмы. То есть алгоритмы выполнения задач.
Всё программирование построено на алгоритмах, соответственно в информатике алгоритмизация как часть математической логики применяется для выполнения задач.
var s:string;
i:integer;
begin
readln(s);
for i:= length(s) downto 1 do
if s[i]=',' then delete (s, i, 1);
writeln(s);
end.