Сделайте вычисление по формуле x-y/1+xy.задание из паскаля

Сделайте вычисление по формуле x-y/1+xy.
задание из паскаля

Задать свой вопрос
2 ответа
Var
x, y, s: real;
begin
readln(x);
readln(y);
s := абс(x) - абс(y) / 1 + abs (x*y);
writeln(s);
end.
Алена Батурчева
Модуль x в начале пренебрегали.
//Pascal ABC.NET v3.0 сборка 111

Var
 x,y:real;
begin
 read(x,y);
 write(абс(x)-abs(y)/1+abs(x*y));
end.

Пример ввода:
1
2
Пример вывода:
1
, оставишь ответ?
Имя:*
E-Mail:


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

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

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

Войти на сайт