Question

Составьте программу, которая осуществляет преобразование единиц измерения физических величин:
а) Значение скорости, измеренные к км/ч, преобразуются в значения, измеренные в м/с (1м/с=3,6км/ч)

Answer 1

Var
a:real;
begin
writeln('Введите значение в км/ч');
readln(a);

a:=a * 1000 / 3600;
writeln;
writeln(a);
end.