Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
Другие темы раздела
Turbo Pascal Найти сторону равностороннего треугольника, вписанного в окружность радиуса r https://www.cyberforum.ru/ turbo-pascal/ thread185291.html
Написать программу, которая находит сторону равностороннего треугольника, вписанного в окружность радиуса r. ребята...помогите плиз...к завтрашнему утру надо)))
Число Смита Turbo Pascal
Нужна помощь по задаче, следующего типа: Составное число называется числом Смита, если сумма его цифр равна сумме цифр всех чисел, образующихся разложением исходного числа на простые множители. Число...
По нажатию номера месяца должно выводить месяц и сезон Turbo Pascal
По нажатию номера месяца должно выводить месяц и сезон, но оно все время выводит одно и тоже(при нажатии любого номера). Подскажите, что в этой программе не так? Program P2; uses crt; type...
Turbo Pascal Нужна формула координат точек пересечения отрезков Напишите пожалуйста формулу нахождения координат точек пересечения отрезков с заданными координатами их концов https://www.cyberforum.ru/ turbo-pascal/ thread185262.html
Turbo Pascal текст и матрица https://www.cyberforum.ru/ turbo-pascal/ thread185259.html
Ребят! нужна такая помощь. нужно написать такую программу, ввводишь текст а программа переводит его в матрицу. ну например: ПРОГРАММА ТЕКСТ это все переводится в такой вид: П Р О Г Р А М М А _ Т...
Сортировка методом бинарных включений Turbo Pascal
Задание: Написать программу, которая будет сортировать одномерный массив методом бинарных включений по возрастанию. Заранее благодарен...
Вычисление суммы ряда Turbo Pascal
Решить с помощью процедуры или функции с использованием цикла. Составить две программы: 1) программу вычисления суммы первых n членов последовательности (k=1,2,3..,n); 2) ...
Turbo Pascal Процедуры: Найти минимальное значение среди сумм элементов всех строк матрицы 3. Дана матрица размера 5 x 10. Найти минимальное значение среди сумм элементов всех ее строк и номер строки с этим минимальным значением. https://www.cyberforum.ru/ turbo-pascal/ thread185236.html
Turbo Pascal Элементы, предшествующие первому нулевому элементу, заменить на 0,5 https://www.cyberforum.ru/ turbo-pascal/ thread185223.html
даны два массива А(10), В(10). в массивах А(10) и В(10) все элементы предшествующие первому нулевому элементу заменить на 0,5.
Turbo Pascal последовательность помогите!!!! решьть задачу на паскале!!!!!!!!!! ПОЖАЛУЙСТА!!! Определить является ли заданная последовательность возрастающей https://www.cyberforum.ru/ turbo-pascal/ thread185221.html
Модератор
63339 / 47049 / 32429
Регистрация: 18.05.2008
Сообщений: 114,045
02.11.2010, 16:00 0

Определить, какая из двух точек находится ближе к оси OX, и какая к оси OY

02.11.2010, 16:00. Показов 2072. Ответов 1
Метки (Все метки)

Лучший ответ Сообщение было отмечено *Timur* как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
uses crt;
var x1,y1,x2,y2:real;
begin
clrscr;
writeln('Введите координаты первой точки');
readln(x1,y1);
writeln('Введите координаты второй точки');
readln(x2,y2);
if abs(y1)<abs(y2) then writeln('Первая точка ближе к оси ОХ')
else if abs(y1)>abs(y2) then writeln('Вторая точка ближе к оси ОХ')
else writeln('Обе точки на одинаковом расстоянии от оси ОХ');
if abs(x1)<abs(x2) then writeln('Первая точка ближе к оси ОY')
else if abs(x1)>abs(x2) then writeln('Вторая точка ближе к оси ОY')
else writeln('Обе точки на одинаковом расстоянии от оси ОY');
readln
end.


Вернуться к обсуждению:
Определить, какая из двух точек находится ближе к оси OX, и какая к оси OY
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
02.11.2010, 16:00

Заказываю контрольные, курсовые, дипломные работы и диссертации здесь.

На оси OX расположены три точки а, b, c. Определить какая из точек b или c расположены ближе к а?
На оси OX расположены три точки а, b, c. Определить какая из точек b или c расположены ближе к а?

По заданным координатам двух точек на плоскости определить, какая из них находится ближе к началу координат
Написать программу, которая по заданным координатам двух точек на плоскости определяет, какая из...

Определите, какая из двух точек находится ближе к началу координат
Составьте программу, решающую следующую задачу: Даны две точки с координатами x1, y1, x2,y2....

Определить, какая из точек находится ближе к началу координат
Написать программу, которая по заданным координатам двух точек на плоскости определяет, какая из...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.