Услуги телефонной связи оплачиваются по следующему правилу: за разговоры до 1000 минут в месяц оплачиваются 12 рублей в минуту, а разговоры сверх установленной нормы оплачиваются из расчета 15 рублей за минуту. Написать программу, вычисляющую плату за пользование телефоном для введенного времени разговоров за месяц. Нужна блок-схема.

Var
a,b,c:longint;
begin
readln(a);
if a                                               begin
                                                  b:=12000;
                                                  c:=b+((a-1000)*15);
                                                end;
writeln(c);
end.