С клавиатуры вводится N метров. Перевести метры в вершки, если известно, что 1 вершок =...

Question

С клавиатуры вводится N метров. Перевести метры в вершки, если известно, что 1 вершок = 4.45 см. (pascal abc)

Answer 1

Var
r,a:real;
begin
readln(a);
a:=a*100;
r:=a/4.45;
writeln(r:0:5);
end.