Var K:array[1..2,1..13] of integer; i,j,ind,x,y:integer; MAX:real; function RAST(x1,x2,y1,y2:integer):real; begin RAST:=sqrt(sqr(x2-x1)+sqr(y2-y1)); end; begin MAX:=-2*sqr(-10-1); randomize; writeln('Исходные точки:'); for j:=1 to 13 do begin writeln('Точка № ',j,', с координатами(X,Y)'); for i:=1 to 2 do begin K[i,j]:=random(110) - 10; write(K[i,j],' '); end; writeln; end; for i:=1 to 13 do if RAST(0,K[1,i],0,K[2,i])>MAX then begin MAX:=RAST(0,K[1,i],0,K[2,i]); x:=K[1,i]; y:=K[2,i]; ind:=i; end; writeln('Номер точки: ',ind,' Координаты: ',x,' ; ',y); end.
1. A & B: В Африке водятся жирафы, и в Мурманске идёт снег. A | B: В Африке водятся жирафы, или в Мурманске идёт снег. A xor B: В Африке водятся жирафы, или в Мурманске идёт снег, но не одновременно. A -> B: Если в Африке водятся жирафы, то в Мурманске идёт снег. !A & !B: В Африке не водятся жирафы, и в Мурманске не идёт снег. Возможны и другие высказывания. & - логическое и, | - логическое или, xor - исключающее или, ! - отрицание, -> - импликация.
2. A = "Винни-Пух любит мёд" B = "Дверь в дом открыта" Исходное высказывание через A, B записывается так: A & B. Нужно построить отрицание !(A & B). По законам де Моргана это еще эквивалентно такому: !A | !B. !(A & B) = Неверно, что Винни-Пух любит мёд и дверь в дом открыта. !A | !B = Винни-Пух не любит мёд или дверь в дом закрыта.
Таблица истинности:
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку