Задано натуральное n и координаты n точек на плоскости. составить алгоритм и программу на delphi для определения координаты точки,наименее удаленной от точки с координатами (10; -2)
195
485
Ответы на вопрос:
Program mindist; {$apptype console} uses sysutils; const k = 100; ax = 10; ay = -2; var t: array[1..k, 1..2] of integer; r, rmin, i, n: integer; begin write('введите число точек на плоскости: '); readln(n); rmin : = 32767; randomize; writeln('исходные данные: '); for i : = 1 to n do begin t[i, 1] : = random(51) - 25; t[i, 2] : = random(51) - 25; r : = sqr(t[i, 1] - ax) + sqr(t[i, 2] - ay); if rmin > r then rmin : = r; writeln('(', t[i, 1], ',', t[i, 2], ')') end; writeln(#13#10, 'минимальное расстояние от а(', ax, ',', ay, ') равно: ', sqrt(rmin)) end.
Var i, x, sum: integer; begin sum: =0; for i: =1 to 10 do begin readln(x); sum: =sum+x; end; writeln(sum); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Negumanitariy09.07.2021 12:36
-
salbekov20107.01.2023 14:16
-
доброx520.10.2021 22:22
-
mockingbird1211.05.2022 07:18
-
р000030.04.2023 23:01
-
dianadiana198222.10.2022 08:49
-
РешОрше05.01.2020 23:26
-
sonya19oo12.10.2021 08:34
-
lolik116200528.09.2020 23:44
-
madamnowiczkai05.04.2021 11:05
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.