Предмет: Информатика,
автор: chakao
Услуги телефонной сети оплачиваются по следующему правилу: за разговоры до a минут оплачивается b рублей,а разговоры сверх нормы оплачиваются из расчета c руб за мин. Напишите программу,вычисляющую плату за пользование телефоном. Помогите,пожалуйста)
Ответы
Автор ответа:
0
var
a, b, c, n, s: real;
begin
write('Введите значение A, B, C = ');
read(a, b, c);
write('Введите время разговора = ');
read(n);
if n < a then s := b
else s := a * b + (n - a) * c;
write('Плата за разговор = ', s, 'руб');
end.
Интересные вопросы
Предмет: Немецкий язык,
автор: MariskaK
Предмет: Физика,
автор: Polinator16
Предмет: Математика,
автор: nastjav0510
Предмет: Физика,
автор: Аноним