Составить программку на языке pascal по след. условиям. Вывести с клавиатуры

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

Задать свой вопрос
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
Егор Скулапов
А можете проверить мою программу?
Надежда Панюшина
program o1;var y,x:real; a,b:integer;beginwriteln('введите значeния a,b');readln(a,b);x:=(a*b-a)/b;writeln('x=',x);y:=Sqrt((Exp(a+b)-Exp(a-b))/x)+Log10(x+a);writeln('y=', y);end.
Anna Pereudina
почему?
Виталя Заселяев
А, извините
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт