Звуки этого устройства спрсобны донести сигнал на несколько километров

на листочке чертишь круг,берешь серединку,и получается- 4 клетки вниз и 7 в право

vara,b: integer; c: real; beginwriteln ('введите 1 число'); read (a); writeln ('введите 2 число'); read (b); c: =(a/1)/(1/b); writeln (c); end.