сервис вопросов и ответоврасписать в паскале: На плоскости расположена окружность R в центре с началом координат.Определить положение точки X с координатами (A,B) относительно
10-11 класс|
|
окружности (лежит ли точка внутри окружности на окружности или вне ее) Если можно полностью
Irafran65
31 марта 2014 г., 0:22:08 (10 лет назад)
Vleki
31 марта 2014 г., 1:59:23 (10 лет назад)
program center;
var a,b,r:Integer;
begin
read(a,b,r);
if ((a*a+b*b) < r) then write('Лежит');
if ((a*a+b*b) > r) then write('Не лежит');
if ((a*a+b*b) = r) then write('Лежит на окружности');
end.
Ответить
Другие вопросы из категории
Первая часть-составление линейной программы для вычисления арифметического выражения, вторая- составление разветвляющего алгоритма в среде турбо паскаль.
1)( x^{4} +18x)/tg(x+1)
2) Из трех заданных чисел определить, какие делятся на 3 и 5
Паскаль помогите пожалуйста
Тип данных Массив от 1 до 10 с элементами типа Integer создать алгоритм который вычеслит произведение парных чисел
Читайте также
Два игрока играют в игру. На координатной плоскости стоит фишка. Игроки ходят поочереди. В начале игры фишка находится в точке с координатами (4,2).
Ход состоит в том, что игрок перемещает фишку из точки с координатами (x,y) в одну из трех точек: или в точку с координатами (x+3,y), или в точку с координатами (x,y+3), или в точку с координатами (x,y+4). Выигрывает игрок, после хода которого расстояние по прямой от фишки до точки с координатами (0,0) не меньше 10 единиц. Кто выигрывает при безошибочной игре – первый или второй игрок? На каком шаге игры произойдет выигрыш? Каким должен быть первый ход выигрывающего игрока?
Составьте программу, определяющую, лежит ли точка с указанными координатами X, Y на окружности радиуса R с центром в начале координат.
Program Frankenstein;
var
x,y,r:integer;
Begin
Write('Введите координату X: ');
Readln(x);
Write('Введите координату Y: ');
Readln(y);
Write('Введите длину радиуса R: ');
Readln(r);
If (sqr(x)+sqr(y))=r
then writeln('Точка лежит на окружности!')
Else writeln('Точка не лежит на окружности!');
End.
Почему программа всегда показывает что точка не лежит на окружности, хотя на самом деле она лежит! Где я ошибся?
На плоскости на расстоянии s [1], s [2],..., s [10] от центра кругового кольца с внутренним радиусом r и внешним R расположены точки. Определить
количество точек, расположенных внутри кольца. ч/з турбо паскаль(одномерный массив). Помогите плз.
Дано множество точек с координатами на плоскости.
Написать программу, которая использует подпрограммы и выведит на экран наименьшее расстояние между двумя точками.
Решите головоломку.Если в слове А его вторую половину, буквы которой образуют слово В, заменить на слово С, то получится слово Д. Причем: А - фрагмент
оперативной памяти размером в 16 байтов; В – конечное число точек на плоскости, соединённых отрезками кривых линий; С – единица измерения расстояния; Д – аргумент или результат процедуры.В ответе запишите найденные слова: сначала А, затем, В, С и Д, через один пробел, без знаков препинания.
Вы находитесь на странице вопроса "расписать в паскале: На плоскости расположена окружность R в центре с началом координат.Определить положение точки X с координатами (A,B) относительно", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.