Question

Составить программу на языке pascal по след. условиям. Вывести с клавиатуры значения переменных a и в, вычислить и вывести на экран значение функции x= (a*b+a)/b

Answer 1

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

begin
  var (a,b):=ReadReal2('Введите a,b:');
  var x:=(a*b+a)/b;
  var y:=Sqrt((Exp(a+b)-Exp(a-b))/x)+Log10(x+a);
  Writeln('y=',y)
end.

Пример
Введите a,b: 14.2 3.18
y=1375.95248723222