Стоимость А метров серой ткани равна В рублей, а стоимоть К метров синей ткани равна М рублей. Какая ткань дороже и на сколько?
Программа считывает 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.
Оцени ответ
