Адрюшка Rush
Адрюшка Rush

Помогите пожалуйста Для десяти выстрелов, координаты которых задаются с клавиатуры Pascal программа

Для десяти выстрелов, координаты которых задаются с клавиатуры, вывести текстовые сообщения о попадании в мишень.
Задача на паскале, имеется код но не от этого рисунка

program shot;
uses crt;
var i: byte;
x,y,r: real;
begin
clrscr;
write('BBEDuTE R: ');
readln(r);
for i:=1 to 10 do
begin
write('BBEDuTe KOOPDuHATbI ',i,'-ro BbICTPeLA: ');
readln(x,y);
if((x*x+y*y=0))
or((x=-r)and(y

Игорь Игорь
Игорь Игорь

((x*x+y*y 0) and ((x+r)*(x+r) + (y+r)*(y+r) < r*r) and (x < -r) and (y < r)

Похожие вопросы
Помогите пожалуйста племяннику написать программу на Pascal
Помогите пожалуйста написать программу на Pascal
помогите пожалуйста с написанием программы в Turbo Pascal
помогите пожалуйста с написанием программы в Pascal Turbo
Помогите написать программу на Pascal, пожалуйста.
Программа (pascal) Вычислить.... Помогите пожалуйста, очень надо!
Пожалуйста, помогите написать эту программу в Pascal!!!
пожалуйста помогите написать программу на языке Pascal
Помогите с программой по Pascal
Помогите, пожалуйста, написать программу, которая определяет, попадает ли точка с заданными координатами в область