Прямоугольник найти 4 вершину - Turbo Pascal

Turbo Pascal

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Рейтинг 4.86/7:

@SStass 2 / 2 / 0 Регистрация: 27.10.2011 Сообщений: 26

	Прямоугольник найти 4 вершину 06.12.2011, 22:24. Показов 1501. Ответов 1 Метки нет (Все метки) Даны вершины прямоугольника х1,у1,х2,у2,х3,у3. Найти четвертую вершину и вывести на экран 0

Лучшие ответы (1)

Сообщение: #2255980

cpp_developer

Эксперт

20123 / 5690 / 1417

Регистрация: 09.04.2010

Сообщений: 22,546

Блог

06.12.2011, 22:24

Ответы с готовыми решениями:

Найти среднюю по значению вершину в дереве
Подскажите, пожалуйста, как искать среднюю по значению вершину в дереве. Средней по значению является та из вершин дерева, которой...

Граф: найти минимальный путь из вершины А в вершину В, проходящий через вершину С
Ребят помогите кто чем может. Задача типа: Найти мин.путь из вершины А в вершину В проходящий через вершину С. Путь должен проходить...

Найти 4 вершину
Даны три последовательные вершины параллелограмма А=(-2,1), B = (1,3),C=(4,0). Найти четвертую его вершину D. Система координат аффинная. ...

Viktor-z

24 / 24 / 12

Регистрация: 23.03.2011

Сообщений: 70

07.12.2011, 08:32

Сообщение было отмечено SStass как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
var  x1,x2,x3,x4,y1,y2,y3,y4:real;
begin
writeln('enter x1,y1, x2,y2, x3,y3');
readln(x1,y1,x2,y2,x3,y3);
if x1=x2 then x4:=x3 else if x1=x3 then x4:=x2 else x4:=x1;
if y1=y2 then y4:=y3 else if y1=y3 then y4:=y2 else y4:=y1;
writeln(x4:0:4, ' ',y4:0:4);
readln;
end.

Что-то вроде этого?

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

Регистрация: 28.12.2010

Сообщений: 21,154

Блог

07.12.2011, 08:32

Помогаю со студенческими работами здесь

Найти вершину параболы
Найдите вершину параболы ax2+bx+c для заданных a,b,c.

Найти вершину и площадь
Помогите, пожалуйста! В равнобедренном прямоугольном треугольнике ABC с основанием СВ найти вершину А и площадь, если С(-1;1), В(4;3)

Найти вершину в дереве
Найти вершину в дереве

Найти третью вершину треугольника
Даны две вершины треугольника: A(2, 4, −1) и B(−2, 3, 4). Найти третью вер- шину C, зная, что середина стороны AC лежит на оси z, а...

найти вершину равнобедреного треугольникатреугольника
Есть равнобедренный треугольник АВС. Сторона АВ = ВС. Известны вершины А и В. Как найти координаты вершины С?

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .

Наверх