Clay1353
14.01.2020 08:14

построить отрицание для высказываний, перевести высказывание и его отрицание на обычный язык, оценить истинность полученных высказываний, если "существует х (х≤2)"

Нажмите на рекламу ниже и сразу увидите ответ
Популярные вопросы:
Ответ:
olgaocher
25.09.2022 06:10
Сборник слов в алфавитном порядке, с пояснениями, толкованиями или с переводом на другой язык.Совокупность всех слов какого-нибудь . языка, а также слов, употреблённых в каком-н. одном произведении или в произведениях какого-нибудь. писателя.-Значение словаря Смотря какой словарь Ну например,если словарь английского языка для перевода слов  с одного языка на другой Энциклопедия- приведённое в систему обозрение всех отраслей человеческого знания или круга дисциплин, в совокупности составляющих отдельную отрасль знания.Энциклопедии делятся на универсальные , отраслевые  , региональные, проблемные, персональные.. 
0,0(0 оценок)
Ответ:
ванёк10062005
07.04.2023 01:34
Var
  a,b,c,d,x,y:real;
begin
  Write('Введите размеры сторон сундука -> '); Readln(a,b,c);
  Write('Введите диаметр иллюминатора -> '); Readln(d);
  if a<b then begin
    x:=a;
    if b<c then y:=b else y:=c
  end
  else begin
    x:=b;
    if a<c then y:=a else y:=c
  end;
  if (sqr(x)+sqr(y)<sqr(d)) then Writeln('Сундук можно вытащить')
  else Writeln('Сундук нельзя вытащить')
end.

Тестовое решение:
Введите размеры сторон сундука -> 3 5 3.99
Введите диаметр иллюминатора -> 5
Сундук можно вытащить

**********************
Условие попадания точки A(x,y) внутрь треугольника описывается как
\begin {cases} x\ge 0 \\ y\ge 0 \\ y\le 5-x \end {cases} \Rightarrow \ (x\ge0) \land (y\ge0) \land (y\le 5-x)

var
  x,y:real;
begin
  Write('Введите координаты x и y точки -> '); Readln(x,y);
  if (x>=0) and (y>=0) and (y<=5-x) then Writeln('Да')
  else Writeln('Нет')
end.

Тестовое решение:
Введите координаты x и y точки -> 3 2.5
Нет

Введите координаты x и y точки -> 2.1 2.8
Да
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота