Составить программу решения уравнения ах=3 для - вопрос №82230283 от 1649fn49 18.03.2020 19:34

Question

Информатика: Составить программу решения уравнения ах=3 для произвольного числа а,

1649fn49 · Answer

// PascalABC.NET 3.3, сборка 1573 от 04.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
var a:=ReadReal('a=');
var x:=3/a;
Writeln('x=',x)
end.

Примеры
a= 1.5
x=2

a= 12
x=0.25

a= 7.12
x=0.421348314606742

a= 0
x=бесконечность