Актуализация ЗАДАНИЕ ДЛЯ СОРа выбраны три задачи, - вопрос №17453523 от Sasha7749 16.12.2020 18:28

Question

Информатика: Актуализация ЗАДАНИЕ ДЛЯ СОРа выбраны три задачи, очень похожие на те которые вы уже решали в домашних заданиях, поэтому кто решал трудностей не будет. У каждого задания разные степени сложности, поэтому разные за каждое задание. Можете обратиться к учебнику. На странице 108 рис.69 есть программа, которая подскажет вам, как выполнять задания. Задача 1. ( ) Найдите площадь треугольника по формуле S=1/2*b*h, где b – сторона треугольника, h – высота. Задача 2. ( ) Выполните следующие вычисления: 1.

Sasha7749 · Answer

Расстояние от точки до начала координат находится как длина гипотенузы прямоугольного треугольника, катетами которого являются координаты точки. Поскольку нам нужны не сами расстояния, а лишь сравнить их, то можно сравнивать квадраты, чтобы не извлекать корня. r_i^2=x_i^2+y_i^2

// PascalABC.NET 3.0, сборка 1088
var
x1,x2,y1,y2,r1,r2:real;
begin
Write('Введите координаты первой точки: '); Read(x1,y1);
Write('Введите координаты второй точки: '); Read(x2,y2);
r1:=sqr(x1)+sqr(y1); r2:=sqr(x2)+sqr(y2);
if r1>r2 then Writeln('Ближе вторая точка')
else
if r1<r2 then Writeln('Ближе первая точка')
else Writeln('Точки равноудалены')
end.

Тестовое решение:
Введите координаты первой точки: 16.3 -11.7
Введите координаты второй точки: 15.8 12
Ближе вторая точка