Чтобы наш снаряд (пуля, мяч или что-то еще) попало в цель,нужно чтобы высота подъема снаряда совпала с высотой, на которой расположенацель, и чтобы дальность полета совпала с заданным расстоянием. Иначе снарядможет улететь выше или ниже цели или не долетать.

Воспользуемся формулами по равнозамедленному движению.

programzadacha;

const

g=9.8;

var

h,L,a,V,S,h1:real;

begin

writeln('vveditevisotu i dalnost celi');

readln(h,L);

writeln('vvediteugol, skorost snariada');

readln(a,V);

a:=a*pi/180;

h1:=int((sqr(V)* sqr(sin(a))) / (2*g));

S:=int((sqr(V)*sin(2*a))/g);

if (S=L)and (h1=h) then writeln('popal') else writeln('ne popal');

end.