Дана точка a(x,y). определить лежит ли эта точка в четвертой координатной четверти. даны два числа, не равные друг другу. заменить большее из них модулем суммы, а меньшее - разностью квадратов этих чисел. help !
193
204
Ответы на вопрос:
var
x, y : real;
begin
read (x, y);
if (x > 0) and (y < 0) then writeln ('yes') else writeln ('no');
end.
не знаю только, как рассмотреть случай, если одна из координат = 0
var
a, b, c : real;
begin
if (a > b) then
begin
c : = a;
a : = abs (a + b);
b : = sqr (c) - sqr (b);
end
else
begin
c : = b;
b : = abs (b + a);
a : = sqr (c) - sqr (a);
end;
writeln (a, ' ', b);
end,
Популярно: Информатика
-
kkira109.10.2021 09:46
-
uma1229.03.2023 14:50
-
kli200192uasmi31.08.2020 12:49
-
niklysov201526.03.2022 12:10
-
maksbaduk19.05.2022 06:50
-
angellacat26ozuxwi12.01.2021 18:47
-
matveyelmakov21.05.2022 05:37
-
Froxy07.02.2022 09:09
-
07072002kl12.09.2020 15:21
-
salihvalishev08.09.2020 23:16