Помогите решить. Паскаль, пожалуйста

0 голосов
15 просмотров

Помогите решить. Паскаль, пожалуйста


image

Информатика (33 баллов) | 15 просмотров
0

И это все условие?

0

Да

0

какие залания?

0

Какие сможете решить

0

да все могу

0

тогда всё)

0

пожалуйста)

Дан 1 ответ
0 голосов

N2
var
x,y:integer;
begin
read(x,y);
if (x<=3) and (x>=-3) and (y<=2) and (y>=0) then write('Принадлежит') else write('Не принадлежит');
end.
в картинке 1)-3 (S)
в картинке 2)-1+3+9...


image
image
(356 баллов)
0

Спасибо