Question

Pascal нужна ваша помощь.
Посчитать стоимость 1 телеграммы
Каждое слово 90 копеек + за саму телеграмму 5р
Заранее спасибо.

Answer 1

const
  cw=0.9;
  ct=5.0;
var
  n:integer;
begin
  Write('Введите количество слов в телеграмме: '); Readln(n);
  Writeln('Стоимость телеграммы составит ',ct+n*cw:0:2,' руб.')
end.

Тестовое решение:
Введите количество слов в телеграмме: 13
Стоимость телеграммы составит 16.70 руб.