Помогите написать программы на языке Паскаль , пожалуйста безотлагательно надо !!!

Помогите написать программки на языке Паскаль , пожалуйста безотлагательно надобно !!!

Задать свой вопрос
1 ответ
1:
var
  x, y: real;
begin
   Readln(x, y);
  Writeln((y gt;= 0) and (y lt;= x + 4) and (y lt;= 4 - x))
end.

2:
var x,y: real;
begin
read (x, y);
if (xgt;=3) and (xlt;=5) and (ygt;=3) and (ylt;=5) then
writeln('true')
else
 writeln('false');
 end.
Леша Кучебин
Это точно?
Ilja Valgin
Запусти и проверь.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

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

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт