В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Lakers44
Lakers44
09.01.2022 02:44 •  Информатика

Определите, что будет напечатано в результате выполнения программы:
Program mash;
Vark, m: Integer;
Dat: array[1..10] of integer;
Begin
Dat[1]:= 1; Dat[2]:= 9;
Dat[3]:= 6; Dat[4]:= 5;
Dat[5]:= 4; Dat[6]:= 2;
Dat[7]:= 0; Dat[8]:= 8;
Dat[9]:= 4; Dat[10]:=19;
m = 0;
for k= 5 to 9 do
if Dat[k] > m then
begin
m := Dat[k]
end;
writeln(m);
End.

Показать ответ
Ответ:
basarbakhtiar
basarbakhtiar
03.12.2020 15:08

/*Решение с обобщения формула Брахмагупты для произвольного четырехугольника. Функция perimeter(double x[], double y[]) возвращает значение периметра, функция area(double x[], double y[]) возвращает значение площади, пример использования и реализация приведены ниже. */

#include <iostream>

#include <math.h>

double perimeter(double x[], double y[]);

double area(double x[], double y[]);

int main()

{

   double x[4], y[4];

   std::cout << "Quadrangle ABCD\n";

   for (auto i = 0; i < 4; i++)

   {

       std::cout << "Input coordinates of point " << char(i + 'A') << ": ";

       std::cin >> x[i] >> y[i];

   }

   std::cout << perimeter(x, y) << " " << area(x, y);

   

   return 0;

}

double perimeter(double x[], double y[])

{

   double a[4], p = 0;

   for (auto i = 0; i < 4; i++)

   {

       a[i] = sqrt((x[i]-x[(i + 1) % 4]) * (x[i]-x[(i + 1) % 4]) + (y[i]-y[(i + 1) % 4]) * (y[i]-y[(i + 1) % 4]));

       p += a[i];

   }

   return p;

}

double area(double x[], double y[])

{

   double a[4], p = 0, s = 1, d[2];

   for (auto i = 0; i < 4; i++)

   {

       a[i] = sqrt((x[i]-x[(i + 1) % 4]) * (x[i]-x[(i + 1) % 4]) + (y[i]-y[(i + 1) % 4]) * (y[i]-y[(i + 1) % 4]));

       p += a[i];

   }

   for (auto i = 0; i < 4; i++)

   {

       s *= (p / 2- a[i]);

   }

   for (auto i = 0; i < 2; i++)

   {

       d[i] = sqrt((x[i]-x[i + 2]) * (x[i]-x[i + 2]) + (y[i]-y[i + 2]) * (y[i]-y[i + 2]));

   }

   s -= (a[0] * a[2] + a[1] * a[3] + d[0] * d[1]) * (a[0] * a[2] + a[1] * a[3] - d[0] * d[1]) / 4;

   s = sqrt(s);

   return s;

}

0,0(0 оценок)
Ответ:
Poli2533
Poli2533
09.08.2022 03:33

ответ: 14) 12Кбайт = 12000 Байт

15) 896

16) Под блокнотом подразумевается стандартный Windows Notepad. Он как дважды два, и таким и задумывался. Предназначен для и возможно редактирования текстовых файлов(не документов, форматирование не изменяется), например .txt, .xml, .html и тд.

MSO Word предназначен для создания редактирования текстовых документов (не текстовых файлов) предназначеных в первую очередь для людьми. Потому очень много уделяется внимания форматированию текста, можно добавлять всякие рисунки, таблички и прочее.

Можно редактировать и текстовые файлы, но это не удобно.

Объяснение: 14) 1Кбайт = 1000 Байт

15) На каждый символ отводится по 2 байта а там 56 символов. 2*56= 112 байт. 1 Байт = 8 Бит

16) Тут объяснять то даже нечего.

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