Составьте
10-11 класс
|
программу, определяющую принадлежность точки А(х, у) окружности с центром
0(0; 0) и радиусом R.
В паскалеABC.
var x,y,r:real;
begin
writeln('Введите радиус окружности');
readln(r);
writeln('Введите координаты точки А');
readln(x,y);
if sqr(x)+sqr(y)=sqr(r) then writeln('Принадлежит')
else writeln('Не принадлежит');
end.
var x,y,r:real;
begin
readln(r);
readln(x,y);
if sqr(x)+sqr(y)<=sqr(r) then
writeln('принадлежит')else writeln('не принадлежит');
end.
в предыдущем решении точка лежит только на границе окружности
Другие вопросы из категории
(укажите несколько вариантов ответа)
1) В файле user.dat
2) В файле sam.sav
3) В файле sam
4) В файле system.dat
5) В файлах с расширением pwl
заданные условия:
_______________________
от 15 до 25 ________________________
от -10 до -20 ___________________________
Читайте также
2. Составить программу для упорядоченное двух элементов по убыванию.
вывести список книг, изданных после 2003 года.
2)составить программу , организующую массив записей о пяти студентах и их оценках по трем предметам. провести сортировку и вывести список отличников.
ракета запускается с земли со скоростью V(км час) в направлении движения земли по орбите вокруг солнца. составить программу,определяющую результат запуска ракета в зависимости от скорости V.
Известно,что при V16,4 ракета покинет солнечную систему.
Составить программу вычисления значений функции F(x) на отрезке [а; b] с шагом h.
Результат представить в виде таблицы, первый столбец которой — значения
аргумента, второй — соответствующие значения функции: "F(x) = 1/2 ctg x/4+4"
суммирование произвольного количества целых чисел вводимых с клавиатуры.Концом последовательности служит ввод отрицательного числа.Программу составьте двумя способами: использую цикл с предусловием и цикл с постусловием