Var x,y:real;
begin
readln(x,y);
if (abs(x)<=1)and(y<=1)and((y>=-x)or(y>=x))
then writeln('Yes') else writeln('No');
end.
Пример:
0.5 -0.4
Yes
Корень раве аб или бс в квадрате.переменные описаны целым типом данных.
1)Cin>>a
2)a/=10
3)b=a%10
4)c=2%10
<span>5)cout<<(a/10+b+c)ит</span>
1: 1
2: 1
3: 1 + 1 = 2
4: 2 + 1 = 3
5: 3 + 2 = 5
6: 5 + 3 = 8
7: 8 + 5 = 13
8: 13 + 8 = 21
9: 21 + 13 = 34
10: 34 + 21 = 55
1, 1, 2, 3, 5, 8, 13, 21, 34, 55, ......
Последовательность чисел Фибоначчи / Fibonacci numbers
Вроде так...
<span>Решение должно иметь от 20 до 5000 символов</span>