Дано n пар чисел xi, yi. подсчитайте количество таких пар, что xi^2 + yi^3 принадлежит диапазону от l до r включительно. примечание: здесь ^ - это операция возведения в степень. то есть, xi^2 = xi*xi yi^3 = yi*yi*yi формат ввода: n – количество пар чисел (n < = 12) l r - левая и правая границы диапазона x1 y1 – первая пара чисел x2 y2 - вторая пара чисел xn yn – n-ая пара чисел пример ввода: 3 5 30 1 1 2 1 1 3 формат вывода: k - количество пар чисел пример вывода: 2
begin
var n:=ReadInteger;
var L,R,x,y:integer;
Read(L,R);
var k:=0;
for var i:=1 to n do begin
Read(x,y);
if x*x+y*y*y in [L..R] then Inc(k)
end;
Writeln(k)
end.
Тестовое решение:
3
5 30
1 1
2 1
1 3
2