• Предмет: Информатика
  • Автор: Пёс1живой1
  • Вопрос задан 10 лет назад

Стоимость А метров серой ткани равна В рублей, а стоимоть К метров синей ткани равна М рублей. Какая ткань дороже и на сколько?

Ответы

Ответ дал: 4MD
0

Программа считывает A, B, K, M.
Учитывая, что A, B, K, M могут быть дробными, и стоимость может быть одинаковой.
Язык программирования: Паскаль.

var
A, B, K, M : real;
begin
readln (A);
readln (B);
readln (K);
readln (M);
if B / A > M / K then
writeln ('Первая ткань дороже на', B / A - M / K, 'рублей');
if M / K > A / B then
writeln ('Вторая ткань дороже на', M / K - A / B, 'рублей'); 
if B / A = M / K then
writeln ('Стоимость тканей одинаковая'); 
end.

Вас заинтересует