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