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

var

  A, B, K, M:integer;

begin

  write(A = ); readln(A);

  write(B = ); readln(B);

  write(K = ); readln(K);

  write(M = ); readln(M);

  if B / A > M / K then

    writeln(Серая ткань дороже синей на , B / A - M / K, тенг за метр)

  else

    writeln(Синяя ткань дороже серой на , M / K - B / A , тенг за метр);

end.

Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!

Загрузить картинку