Question

набрать программу в паскале
Извесно,что  "а" кг яблок стоит "b" рублей. Найдите сколько стоит "z" килограммор ябок 

Answer 1

var

  a, b, z : real;

begin

  readln (a, b, z);

  writeln (z * (b / a));

end.