===== PascalABC.NET =====
type
Point = (real, real);
Vector = Point;
function GetVector(A, B: Point) :=
(B[0] - A[0], B[1] - A[1]);
function PointInTriangle(A, B, C, P: Point): boolean;
begin
var bV := GetVector(A, B);
var cV := GetVector(A, C);
var pV := GetVector(A, P);
var k1 := (pV[0] * bV[1] - bV[0] * pV[1]) /
(cV[0] * bV[1] - bV[0] * cV[1]);
Result := False;
if (k1 >= 0) and (k1 <= 1) then
begin
var k2 := (pV[0] - k1 * cV[0]) / bV[0];
Result := (k2 >= 0) and (k1 + k2 <= 1)
end
end;
begin
var x, y: real;
var A, B, C, P: Point;
Write('Координаты точки A: '); Read(x, y);
A := (x, y);
Write('Координаты точки B: '); Read(x, y);
B := (x, y);
Write('Координаты точки C: '); Read(x, y);
C := (x, y);
Write('Координаты точки P: '); Read(x, y);
P := (x, y);
Writeln(PointInTriangle(A, B, C, P)); // True - принадлежит
end.
Поделитесь своими знаниями, ответьте на вопрос:
Опишите: Константы: MAX_COL - 100 MAX_ROW - 100 тип массив TRow как массив целых чисел из MAX_COL элементов (задано константой) элементов с индексами от 1 до MAX_COL; тип массив TTable как массив из строк целых чисел (TRow) из MAX_ROW элементов (задано константой) элементов с индексами от 1 до MAX_ROW; Количество элементов массива задается с клавиатуры (сначала строки, потом столбцы) Организовать одномерный массив из целых чисел, равный количеству строк исходного массива. Заполнить двумерный массив с клавиатуры. Найти максимальный элемент в каждой строке и записать его в на соответствующее место одномерного массива. В программе должны быть процедура заполнения одной строки, процедура вывода одномерного массива, а также функция нахождения максимума одной строки (т.е. одномерного массива
1.Ученые-математики производят расчеты при построении поверхностей
ответ: Прикладное ПО
2.Дизайнер интерьеров создает проект детской комнаты
ответ: Прикладное ПО
Веб-программист создает сайт по заказу учебного заведения
ответ: Системы программирования
Методист составляет компьютерный тест по английскому языку
ответ: Прикладное ПО
Дизайнер обрабатывает фотографии при подготовке портфолио
ответ: Прикладное ПО
Объяснение:
Прикладные программы - это программы , с которых пользователи непосредственно решают свои профессиональные задачи,это офисные программы (Microsoft Office ,к примеру),Финансовые и бухгалтерское ПО,развлекательные и образовательные и т.д.
Операционная система - комплекс взаимосвязанных программ, предназначенных для управления ресурсами компьютера и организации взаимодействия с пользователем.В случае с Windows ,управление окнами.
Система программирования - программная система, предназначенная для разработки программ на конкретном языке программирования, Python, к примеру.
Программное обеспечение - программа или множество программ, используемых для управления компьютером.Драйвера,игры (это тоже программное обеспечение))