Форум: "Потрепаться";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Вниз

AND&OR 


Blackweber   (2002-03-03 01:25) [0]

Тех кто особо разбирается в AND&OR прошу помочь. Вот нужно сделать лабу двумя методами.Суть определить вхождение точки в фигуру.
<img src= http://delphi.mastak.ru/download/347.JPG>
Через OR я сделал, а вот про AND вначале думал надо 13 вариантов, а теперь думаю это вообще нельзя сделать.

Кому интересно вот код на Паскале с OR:

uses crt;
var x,y:real;n:integer;
begin
clrscr;
Writeln("ЏаЁ ўлЎ®аҐ 1-®Ј® ў аЁ ­в § ¤ з Ўг¤Ґв аҐиҐ­ ЇаЁ Ї®¬®йЁ OR, 2-®Ј® ў аЁ ­в - AND");
readln(n);
case N of
1: begin
write("‚ўҐ¤ЁвҐ X: ");
readln(x);
write("‚ўҐ¤ЁвҐ Y: ");
readln(y);
if (sqr(x-4)+sqr(y-4))<9 then
begin
if (y>19-3*x)or(y<13-3*x)or(y>3*x-5)or(y<3*x-11)
then writeln("’®зЄ ЇаЁ­ ¤«Ґ¦Ёв дЁЈгаҐ.")
else writeln("’®зЄ ­Ґ ЇаЁ­ ¤«Ґ¦Ёв дЁЈгаҐ.")
end else writeln("’®зЄ ­Ґ ЇаЁ­ ¤«Ґ¦Ёв дЁЈгаҐ.")
end;
2: begin
writeln("Not ready!")
end;
end;
readln
end.



Donal_Graeme   (2002-03-03 03:07) [1]

A OR B = NOT (NOT (A) AND NOT (B))

надеюсь, поможет :-)



Blackweber   (2002-03-03 14:13) [2]

Вы картинку видели?
Нужно с помощью AND решить ту же самую задачу.



Anatoly Podgoretsky   (2002-03-03 15:21) [3]

У тебя вопрос про картинку или про OR/AND



Blackweber   (2002-03-03 21:40) [4]

У меня вопрос: можно ли решить задачу(на картинке) через AND



Anatoly Podgoretsky   (2002-03-03 21:48) [5]

Ну тебе же дали формулу преобразования



Mbo   (2002-03-04 06:40) [6]

ты обдумай логику решения, и запиши ее по английски, вот и будет счастье.
если (входит в круг) и не [(ниже одной прямой)и (ниже второй)
и (выше 3-ей прямой)и (выше 4-ой)]
[] -вхождение в ромб



Blackweber   (2002-03-04 21:45) [7]

TNX




Форум: "Потрепаться";
Поиск по всему сайту: delphimaster.net;
Текущий архив: 2002.04.11;
Скачать: [xml.tar.bz2];




Наверх





Память: 0.72 MB
Время: 0.02 c
1-32754           Yu                    2002-03-28 10:30  2002.04.11  
Всем привет


6-32934           ShaH                  2002-01-23 13:16  2002.04.11  
Доступ к файлам


1-32839           LiNkS                 2002-03-29 09:32  2002.04.11  
ListBox


3-32680           grabovsky             2002-03-20 16:36  2002.04.11  
увеличение справочника БД


6-32919           Malyatkoya            2002-01-16 17:50  2002.04.11  
Нужен совет.