Есть ответ 👍

Напишите , , программу попадания точки в область на паскале​

151
380
Посмотреть ответы 2

Ответы на вопрос:


program test;

var x,y: integer;

begin

read(x,y);

if (x> =-3) and (x< =2)

and (y> =-1) and (y< =1)

then write ('входит') else write ('не входит');

end.


Var a1,a2,a3,a4: real; begin readln(a1,a2,a3,a4); if (a1< > a2) and (a1< > a3) then writeln(a1); if (a2< > a1) and (a2< > a3) then writeln(a2); if (a3< > a1) and (a3< > a2) then writeln(a3); if (a4< > a3) and (a4< > a2) then writeln(a4); end.

Популярно: Информатика