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

Составить на C++ Составить ведомость, включающую сведения об аудиториях: но-
мер аудитории, этаж, предназначение аудитории (лекции, лабора-
торные занятия). Дополнить список еще одной аудиторией.

👇
Открыть все ответы
Ответ:
snegjana
snegjana
18.05.2021

Оғыз мемлекеті (ЫХ ғасырдың соңы— ХЫғасырдың ортасы). ЫХ ғасырдың ортасында Сырдарияның орта және төменгі ағысында, сонымен қатар Батыс Қазақстанды да қосып алатын территориясында оғыз тайпаларының саяси бірлестігі құрылды. «Оғыз» деген терминнің этимологиясы әлі де анықталмаған. Алайда "оғыз" сөзінің пайда болуы туралы әр түрлі пікірлер жоқ емес. Кейбір ғалымдар "уыз" сөзінен шықты десе, екінші біреулері "садақтың оғы" деген сөзден пайда болған дейді. Ал үшінші бір ғалымдар "өгіз" деген тотемдік сөзден пайда болды деп дәлелдеуге тырысады. Махмуд Қашқари, әл-Марвази еңбектерінде, оғыздарға жататын руларды атап кеткен: қынық, баят, язғыр, имур, қарабулақ, тутырка, т.б. Оғыздар 2 экзогамды фрактриядан құрылған. Бұлар — боз оқ және үш оқ (учук). ВЫЫЫ ғасыр ортасында түргештер мұрасы үшін қарлұқтармен болған күресте оғыздардың едәуір бөлігі Жетісуды тастап, Шу алқабына кетеді. Осы жерде олардың «Көне Гузия>> деп аталатын ордасы болды. ЫХ ғасырдың бас кезінде оғыздардың көсемі қарлұқтармен, қимақтармен одақтасып, кангар-печенег бірлестігін күйретеді, сөйтіп Сырдың төменгі жағы мен Арал өңірі мен даласын басып алады. ЫХ ғасыр соңында олар хазарлармен одақ құрып, печенегтерді жеңеді де, Орал мен Еділ арасын қол астына қаратады.

4,5(32 оценок)
Ответ:
Phoenix511
Phoenix511
18.05.2021
Используется формула Гаусса (формула "шнурования").

// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

- с функцией:

function SPolygonGauss(a:array of real):real;
// Возвращает вычисленную по формуле Гаусса площадь многоугольника,
// координаты вершин которого заданы массивами х и у
begin
  var (n,i):=(a.Length-4,0);
  Result:=0.0;
  while i<=n do begin
    Result+=a[i]*a[i+3]-a[i+1]*a[i+2];
    i+=2
    end;
  Result:=Abs(0.5*Result)
end;

begin
  var x:=ReadArrReal('Введите координаты вершин 5-угольника:',10);
  SetLength(x,12);
  x[10]:=x[0];
  x[11]:=x[1];
  Writeln('Площадь равна ',SPolygonGauss(x))
end.

Пример
Введите координаты вершин 5-угольника: 0.6 2.1 1.8 3.6 2.2 2.3 3.6 2.4 3.1 0.5
Площадь равна 3.915

- с процедурой:

procedure SPolygonGauss(a:array of real; var s:real);
// Вычисляет по формуле Гаусса площадь многоугольника,
// координаты вершин которого заданы массивами х и у
begin
  var (n,i):=(a.Length-4,0);
  s:=0.0;
  while i<=n do begin
    s+=a[i]*a[i+3]-a[i+1]*a[i+2];
    i+=2
    end;
  s:=Abs(0.5*s)
end;

begin
  var x:=ReadArrReal('Введите координаты вершин 5-угольника:',10);
  SetLength(x,12);
  x[10]:=x[0];
  x[11]:=x[1];
  var s:real;
  SPolygonGauss(x,s);
  Writeln('Площадь равна ',s)
end.
4,8(30 оценок)
Новые ответы от MOGZ: Информатика
Полный доступ к MOGZ
Живи умнее Безлимитный доступ к MOGZ Оформи подписку
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ