Показать сообщение отдельно
Непрочитано 15.10.2013, 23:40   #5
SlavBar Мужской

Аватар для SlavBar
 
В гостях
Регистрация: 06.12.2011
Адрес: WolfRiver
Сообщений: 45
pm
По умолчанию Re: Есть тут программисты?

Цитата:
Сообщение от Kra5av1n [Ссылка заблокирована: Зарегистрируйтесь!]
[Ссылка заблокирована: Зарегистрируйтесь!]
Блин, а я думал что по-сложнее. Даже формулу в Экселе написал для варианта с кривым ромбом.
Код:
=ЕСЛИ(И((ИЛИ(y<x+1;y=x+1));(ИЛИ(y<(1-0,25*x);y=(1-0,25*x)));(ИЛИ(y>(-2-2*x);y=(-2-2*x)));(ИЛИ(y>(-2+0,5*x);y=(-2+0,5*x))));"ок!";"мимо!ололо")
Сам не программист, но на сколько понял нужно что бы введенные Х и У были в области - то есть одновременно удовлетворяли условию -1<=X<=4 и -2<=Y<=1

ромб
Код:
var
  x,y: real;
begin
  write('Введите значения x y: ');
  readln(x,y);
  if ((y<=(x+1))and(y<=(1-0.25*x))and(y>=(-2-2*x))and(y>=(-2+0.5*x)))
    then writeln('TRUE') else
      writeln('FALSE');
  readln;
end.
прямоугольник
Код:
var
  x,y: real;
begin
  write('Введите значения x y: ');
  readln(x,y);
  if ((x>=(-1))and(x<=4)and(y<=1)and(y>=(-2)))
    then writeln('TRUE') else
      writeln('FALSE');
  readln;
end.
чето типо этого штоли?
Если, да то хотелось бы узнать на кого учишься и какой курс?

---------- Добавлено в 01:40 ---------- Предыдущее сообщение было написано в 01:33 ----------

да, забыл:
"free, использование на свой страх и риск"
претензии из-за "двойки" не принимаются
SlavBar вне форума   Ответить с цитированием