Программа в pascalabc даны две точки в плоской прямоугольной системе координат. напишите программу, которая позволяет вводить с клавиатуры координаты точек, вычислять расстояние их до начала координат и определять - которая из точек (первая или вторая) находятся ближе к началу координат.
283
348
Ответы на вопрос:
// pascalabc.net 3.2, сборка 1381 от 04.02.2017 // внимание! если программа не работает, обновите версию! type point=(real,real); procedure getpoint(var q: point); begin var a,b: real; write('введите координаты точки: '); read(a,b); q: =(a,b) end; function distance(a: point): =sqrt(sqr(a[0])+sqr(a[1])); begin var a,b: (real,real); getpoint(a); getpoint(b); var d1: =distance(a); var d2: =distance(b); if d1< d2 then writeln('первая точка ближе') else if d1> d2 then writeln('вторая точка ближе') else writeln('точки равноудалены') end. пример введите координаты точки: 13.7 -11.25 введите координаты точки: 18 12.4 первая точка ближе
Var sum,i: integer; begin for i: =1 to 10 do sum: =sum+i*i; writeln(sum); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Тома1111111рок31.08.2020 03:55
-
ilyanachkebiya06.04.2020 00:41
-
Anchoys77721.09.2020 16:00
-
elzamarg22.06.2020 22:02
-
vannyporchun03.01.2021 13:06
-
arishkakorneva26.09.2020 01:31
-
roma191816.11.2020 17:40
-
assija5609.06.2023 11:53
-
DarthRevan814.06.2023 16:43
-
Вопросникыыы25.12.2020 14:39
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.