Напишите программу пересчёта расстояния их километров в вёрсты (1 верст = 1066,8 м).Для...

Question

Напишите программу пересчёта расстояния их километров в вёрсты (1 верст = 1066,8 м).

Для паскаль ABC

Comments

Какой язык?

---

fyukbqcrbq

---

англ

Answer 1

Var a:real;
begin
writeln('Введите расстояние в километрах');
readln(a);
a:=a*1000/1066.8;
writeln(a);
end.

Comments

а в скобках любое число в км можно ввести

---

Да,запустите программу и проверьте