Составить программу, определяющую принадлежность точки с координатами x, y заштрихованной области:
ЯЗЫК КАКОЙ?
НАПИСАЛА НА ПАСКАЛЬ
VAR X,Y:REAL; BEGIN READLN(X,Y); IF (Y<=-X+6)AND(Y>=-2*X+4)AND(Y>=0)AND(X>=0)THEN WRITELN('ПРИНАДЛЕЖИТ') ELSE WRITELN('НЕ ПРИНАДЛЕЖИТ') END.
Да, на паскаль. Спасибо!
А перед readln не надо писать writeln?
Не обязательно.
Можно написать, тогда - все, что будет написано в апострофах выйдет на экран в неизменном виде. Это удобство, но не обязательная часть программы. Но можно добавить
Writeln('Введите x y')
а без writelm просто будет мигать курсор и ждать, когда будут введены x y через Enter