Ivan1568

23.04.2022

Язык Pascal. Напишите программу, которая позволяет вводить координаты двух точек на плоскости. (координаты целочисленые) и выводит на экран расстояние между ними.

Информатика

Ответить

Ответы

arbat

23.04.2022

program z1;

var xa,ya,xb,yb:integer;

begin

write('Введите координаты первой точки: ');

read(xa,ya);

writeln('Введите координаты второй точки: ');

read(xb,yb);

writeln('Расстояние между точками равно: ',sqrt(sqr(xb-xa)+sqr(yb-ya)):0:3);

end.

Объяснение:

Расстояние между двумя точками A(xa, ya) и B(xb, yb) на плоскости:

$AB = \sqrt{(xb - xa)^{2} + (yb - ya)^{2}}$

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Язык Pascal. Напишите программу, которая позволяет вводить координаты двух точек на плоскости. (координаты целочисленые) и выводит на экран расстояние между ними.

▲

Язык Pascal. Напишите программу, которая позволяет вводить координаты двух точек на плоскости. (координаты целочисленые) и выводит на экран расстояние между ними.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Чему будет равно значение переменной «s» после выполнения этой программы? var s, k: integer; begin s := 23; for k := 2 to 9 do s := s + 32 mod k; writeln(s); end.

Скопируйте полученную программу в средупрограммирования на языке Паскаль. Запустите программу и заполнитетаблицу результатами тестовHLP ПЛЕЗ

Написать программу вычесления для заданного натурального числа n: s=1+√2+√3++√n

Посчитать то, что под знаками вопроса и проверить другие

Нужна по двум первым заданиям. Все на паскале, желательно сделать блок схемы.

выполнят в программе Python

Найдите ошибки в программе(паскаль) program zadacha var v1, t1, v2, t2, v: real; begin ; writeln (‘введите значения v1, t1, v2, t2’); readln (v1, t1, v2, t2); t = (v1t1+v2t2)/(v1+v2); ...

Виконай послидовнисть команд ы пройди маршрут. який приз ти отримав?

Найдите основание системы счисления х для которого выполняется равенство 32х+64х=106х

Язык Pascal. Напишите программу, которая позволяет вводить координаты двух точек на плоскости. (координаты целочисленые) и выводит на экран расстояние между ними.

Ответы

Ответить на вопрос

Ваше имя (никнейм)*

Email*

Комментарий*

Популярные вопросы в разделе

Чему будет равно значение переменной «s» после выполнения этой программы? var s, k: integer; begin s := 23; for k := 2 to 9 do s := s + 32 mod k; writeln(s); end.

Скопируйте полученную программу в средупрограммирования на языке Паскаль. Запустите программу и заполнитетаблицу результатами тестовHLP ПЛЕЗ​

Написать программу вычесления для заданного натурального числа n: s=1+√2+√3++√n

Посчитать то, что под знаками вопроса и проверить другие

Нужна по двум первым заданиям. Все на паскале, желательно сделать блок схемы.

выполнят в программе Python

Найдите ошибки в программе(паскаль) program zadacha var v1, t1, v2, t2, v: real; begin ; writeln (‘введите значения v1, t1, v2, t2’); readln (v1, t1, v2, t2); t = (v1*t1+v2*t2)/(v1+v2); ...

Виконай послидовнисть команд ы пройди маршрут. який приз ти отримав?

Найдите основание системы счисления х для которого выполняется равенство 32х+64х=106х

Скопируйте полученную программу в средупрограммирования на языке Паскаль. Запустите программу и заполнитетаблицу результатами тестовHLP ПЛЕЗ

Найдите ошибки в программе(паскаль) program zadacha var v1, t1, v2, t2, v: real; begin ; writeln (‘введите значения v1, t1, v2, t2’); readln (v1, t1, v2, t2); t = (v1t1+v2t2)/(v1+v2); ...