Водной из кодировок unicode каждый символ кодируется 16 битами. определите информационный объём следующего предложения в данной кодировке: глаза — зеркало души.
266
472
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1356 от 04.12.2016 // внимание! если программа не работает, обновите версию! type point=record x,y: real; name: char end; vector=record x,y,l: real; end; function createpoint(px,py: real): point; begin with result do begin x: =px; y: =py; end end; function createvector(a,b: point): vector; begin with result do begin x: =b.x-a.x; y: =b.y-a.y; l: =sqrt(x*x+y*y) end end; function isnormal(a,b: vector): =abs(b.x*a.x+b.y*a.y)< =1e-6; begin var x,y: real; write('введите координаты x и y точки a: '); read(x,y); var a: =createpoint(x,y); write('введите координаты x и y точки b: '); read(x,y); var b: =createpoint(x,y); var ab: =createvector(a,b); write('введите координаты x и y точки c: '); read(x,y); var c: =createpoint(x,y); var bc: =createvector(b,c); if abs(ab.l-bc.l)> 1e-6 then begin writeln('стороны ab и bc не равны'); exit end; if not isnormal(ab,bc) then begin writeln('стороны ab и bc не перпендикулярны'); exit end; write('введите координаты x и y точки d: '); read(x,y); var d: =createpoint(x,y); var cd: =createvector(c,d); if abs(ab.l-cd.l)> 1e-6 then begin writeln('стороны ab и cd не равны'); exit end; var ad: =createvector(d,a); if abs(ab.l-ad.l)> 1e-6 then writeln('стороны ab и adc не равны') else writeln('точки образуют квадрат с точностью не ниже 0.000001') end. пример здесь заданы координаты квадрата, сдвинутого относительно осей координат и повернутого на угол 30 градусов против часовой стрелки. поэтому числа такие "некруглые". введите координаты x и y точки a: -0.4641 -4.4641 введите координаты x и y точки b: 3.5359 2.4641 введите координаты x и y точки c: 10.4641 -1.5359 введите координаты x и y точки d: 6.4641 -8.4641 точки образуют квадрат с точностью не ниже 0.000001
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
svinka0330.11.2020 06:38
-
Dragonhaadi20.05.2021 07:30
-
superkurmaleev03.12.2021 10:49
-
ilyabes199818.06.2023 09:09
-
панда26723.06.2023 11:36
-
mary357vozd80s08.10.2022 15:52
-
Andreyzem425.10.2020 00:48
-
katy51230.10.2020 13:18
-
skvortsovaasya24.03.2020 12:25
-
stephanzakharop010v807.04.2020 03:48
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.