Задача 3. Написать программу, определяющую, лежит ли точка суказанными…

Question

33

Задача 3. Написать программу, определяющую, лежит ли точка суказанными координатами А (x, y) на окружности радиуса R с центром в начале координат (может лежать на окружности, внутри окружности, вне окружности) PS: Pascal (не турбо) Всем буду благодарен!

категория: информатика

ответить

в избранное ссылка

Знаете ответ?

aphrodisiac · Accepted Answer

67

aphrodisiac

10 марта 2023

Varx,y, r: Iinteger; BeginWrite ('Введите координату X: '); Readln (x); Write ('Введите координату Y: '); Readln (y); Write ('Введите длину радиуса R: '); Readln®; If (sqr (x)+sqr (y)=r then writeln ('Точка лежит на окружности! ') Else writeln ('Точка не лежит на окружности! '); End.

комментировать

в избранное ссылка отблагодарить

Email:
Пароль:
	забыли пароль?

Логин:
Email:
Пароль: