Ответ: Помогите доделать игру!MidletPascal.
Все,исправил.Процедура вызываеца,а следующую вызвать не может,хотя там по логике вроде все правильно!
:::::::::::::::::::::::::::::::::::::::::::::::::: :::::::::::::::::::::::::::::::::::::
:::::::::::::::::::::::::::::::::::::::::::
procedure aaaaaaa;
begin
Q:=70;
U:=0;
if (q>x) and (q<(x+19)) and (u<43) and (u<38 ) then
begin
halt;
end;
end;
procedure bombarding;
begin
q:=50;
u:=0;
if (q>x) and (q<(x+19)) and (u<43) and (u<38 ) then
begin
aaaaaaa;
end;
end;
Это пахать не хочет!Не вызывает процедуру aaaaaaa;!!!!!!!!!!!!!!!!В чем проблема?
|