Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
vladgodd
20.02.2021 00:27 •
Информатика
Даны координаты противопложных вершин прямоугольника х1 у1 х2 у2 стороны прямоугольника парралельны осям координата координат* составьте программу вычесления периметра и площади прямоугольника
Показать ответ
Ответ:
Traken
05.10.2020 09:07
На паскале :
var x1,x2,x3,y1,y2,y3,ax,bx,ay,by,a,b,p,s:integer;
begin
readln(x1); readln(y1); readln(x2); readln(y2);
x3:=x1; y3:=y2; //координаты 3 точки
ax:=x1-x3; ay:=y1-y3; bx:=x2-x3; by:=y2-y3; //координаты направляющих векторов
a:=sqrt(sqr(ax)+sqr(ay)); //длинна вектора
b:=sqrt(sqr(bx)+sqr(by)); //длинна вектора
p:=2*(a+b); //периметр
s:=a*b; //площадь
writeln(p);
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
krudnya
18.05.2020 15:46
У герои Майнкрафта Алекса есть машина, которая выпускает по 4 минерала в минуту. На каждый 100 минералов можно построить новую машину ,которая также выпускае по 4 минерала...
Alinaakconova9
07.08.2020 10:09
Верно ли, что при делении положительного целого числа a на положительное число b получается остаток, равный одному из двух заданных чисел c или d. Проверять на положительность...
donaldavis1337
13.03.2020 18:51
Сдано найти решение два текста содержат одинаковое количество символов первый текст 32 а второй 64 . во сколько раз различаются информационные объемы этих текстов...
LitunIlya
14.05.2022 17:49
К какому типу алгоритма относится высказывание: ЕСЛИ хочешь быть здоров,ТО закаляйся, ИНАЧЕ валятся на диване...
kostya79bat1
18.01.2023 20:34
Написать программу решения следующей задачи: Определить, какая из точек A(x1,y1,z1) или B(x2,y2,z2) расположена ближе к точке C(x3,y3,z3). Код нужно написать на языке нужно...
aida2801
15.05.2020 10:11
Считая, что один символ кодируется 8 битами, определите, чему равен информационный объём следующей пословицы: Васька слушает да ест....
daviduk2509
05.09.2022 12:54
Доклад об возникновения любого культурного сооружения казахстана....
Mariya1616161
31.10.2021 10:08
Вязыке в отличие от украинского,без ударения никогда не бывает гласных и...
МОЗГ1987
20.03.2022 11:39
Вкруг обвел , стрелочкой текст....
QueenAlinacom
31.10.2021 10:08
:* квадратный корень из 2,7 умноженное на квадратный корень из 120...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var x1,x2,x3,y1,y2,y3,ax,bx,ay,by,a,b,p,s:integer;
begin
readln(x1); readln(y1); readln(x2); readln(y2);
x3:=x1; y3:=y2; //координаты 3 точки
ax:=x1-x3; ay:=y1-y3; bx:=x2-x3; by:=y2-y3; //координаты направляющих векторов
a:=sqrt(sqr(ax)+sqr(ay)); //длинна вектора
b:=sqrt(sqr(bx)+sqr(by)); //длинна вектора
p:=2*(a+b); //периметр
s:=a*b; //площадь
writeln(p);
writeln(s);
end.