Составить метод вычисления цены поездки на автомобиле на дачу туда и

Метод:
Объявляем 4 переменные вещественного типа и считываем их.
Выводим математическую формулу, для вычисления цены.
Количество бензина на 1 км пути * двойное расстояние до дачи * цена бензина.
-----------------------------------------------------------------------------------------
Ниже приведена программка на языке Паскаль
-----------------------------------------------------------------------------------------
var
S, count, price, ans:real;
Begin
Writeln('Введите расстояние до дачи -gt; ');Readln(s);
Writeln('Введите расход бензина на 100 км пути -gt; ');Readln(count);
Writeln('Введите цену бензина -gt; ');Readln(price);
ans:= ((count/100)* 2*s * price );
Writeln('Цена поездки: ', ans);
end.
-----------------------------------------------------------------------------------------
Пример:
Введите расстояние до дачи -gt;
28.54
Введите расход бензина на 100 км пути -gt;
13.1
Введите цену бензина -gt;
45
Цена поездки: 336.4866