переменная cos имеет тип real её значение 7.542E-01
нужно её округлить до сотых ,но не в виде writeln(cos:4:2) (тоесть не при выводе ответа, а для промежуточных вычислений)
а в виде cos:= ????

var s: real;begin   write('задайте число: ');   readln(s);   s:=Round(s*100);   s:=s/100;   writeln(s);end.