Напишите программу для следующей задачи: Компьютер спрашивает названия двух планет, радиусы их орбит (в миллионах километров) и скорости движения по орбите (в миллионах километров в сутки). Компьютер вычисляет продолжительность года на планетах и выдает результат в таком виде: Продолжительность года на планете Земля – 365 суток.
в общем я её написал и роде бы всё правильно сдела. Но начались проблеммы с отображением чисел.
R,V,S :Real;
BEGIN
WriteLn('скажите название планеты');
ReadLn('plan');
WriteLn('Какой радиус орбиты планеты?');
ReadLn(R);
WriteLn('какая скорость планеты км/сутки');
ReadLn(S);
V:=2*Pi*R/S);
WriteLn('Продолжительность года на планете ',plan,' – ',V,' суток');
ReadLn
END.
в общем R=150000000
S=2609280
а в итоге мне почему то выдаётся ответ