{* Задача217 *}
REM basic
'
Предположим, что стоимость поездки на такси определяется как сумма'
следующих платежей: 10 руб. за посадку и 1 км пути плюс 5 рублей'
за каждые 500 метров проезда свыше 1 км.'
Составить программу, которая рассчитывает плату за проезд при вводе'
длины пройденного пути. Путь вводится с точностью до 0.5 км.CLS
sid1km = 10
sverh05km = 5
INPUT "Введите длину пройденного пути (в км): ", l
If l 1
Then
pay = sid1km + sverh05km * ((l - 1) / .5)
End If
PRINT "Плата за проезд:" + STR$(pay) + " руб."
End