program { string param; real r = 3.5; write ("Specify string>> "); read(param); write (-r," ", +param); }