М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
klimenkol21
klimenkol21
23.01.2021 09:15 •  Информатика

1. Приведите три примера бесполезной информации. 2. Какой информационный процесс представляет собой дистанционная лекция для
студентов в системе Миралолис?
3. Переведите число 1020 1210 из десятичной в двоичную систему счисления.
4. Переведите число 136s из восьмеричной в десятичную систему счисления.
5. Составить функциональную логическую схему для выражения и решить ее при
следующих значениях. Х=ложь. Y= ложь. Z=истина:
не Z или не X и не Y) или Zине (X и Y)
6. Вычислите значение выражение при следующих значениях А=истина В-истина.
C=ложь.
Не (А и В неС) — (неА или В)
7. Информационный объем текста составляет 4.5 Кб. В тексте 6144 символа. Определите
мощность алфавита. С которого записан текст.​

👇
Открыть все ответы
Ответ:
<html lang="en"><head> <meta charset="UTF-8"> <meta name="viewport" content="width=device-width, initial-scale=1.0"> <meta http-equiv="X-UA-Compatible" content="ie=edge"> <title>Document</title></head><body> <h1>Книги</h1> <a href="#g1">"Тарас Бульба"</a> <a href="#g2">Название книги</a> <a href="#g3">Название книги</a> <p id="g1">Тарас бульба</p> <span>Текст отрывка</span> <img src="Адрес картинки.jpg"> <p id="g2">Название книги название книги</p> <span>Текст отрывка</span> <img src="Адрес картинки.jpg"> <p id="g3"></p> <span>Текст отрывка</span> <img src="Адрес картинки.jpg"></body></html>
4,6(58 оценок)
Ответ:
32519
32519
23.01.2021
// PascalABC.NET 3.3, сборка 1627 от 27.01.2018
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=4;
  var xp:=new real[n];
  var yp:=new real[n];
  Writeln('Введите парами координаты четырех вершин');
  for var i:=0 to n-1 do Read(xp[i],yp[i]);
  var (x,y):=ReadReal2('Введите координаты точки:');
  var (i,j,c):=(0,n-1,False);
  while i<n do begin
    if ((yp[i]<=y) and (y<yp[j]) or (yp[j]<=y) and (y<yp [i]))
      and (x<(xp[j]-xp[i])*(y-yp[i])/(yp[j]-yp[i])+xp[i]) then c:=not c;
    j:=i; i+=1;
    end;
  if c then Writeln('Внутри')
  else Writeln('Не внутри')
end.
4,5(35 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ