Программа паскаль , в чем проблема ?
Program
Var a,b:integer;
c:real;
Begin
ReadLn(a,b);
c:= 3;
c:= 5;
c:= 1;
writeln (c:0:2);
end.