Статистика
Всего в нашей базе более 4 327 664 вопросов и 6 445 978 ответов!

Ввести с экрана координаты двух точек, найти расстояние между ними.

10-11 класс

Mirzo2002 06 нояб. 2014 г., 7:59:16 (9 лет назад)
Рейтинг
+ 0 -
0 Жалоба
+ 0 -
халиловна
06 нояб. 2014 г., 9:53:51 (9 лет назад)

var
    x, x1, y, y1, d : Integer;
begin
    Writeln('Введите координаты первой точки:');
    Write('x: ');
    Readln(x);
    Write('y: ');
    Readln(y);

    Writeln('Введите координаты второй точки:');
    Write('x: ');
    Readln(x1);
    Write('y: ');
    Readln(y1);

    d := sqrt( sqr(x1-x) + sqr(y1-y) );
    Write('Расстояние между двумя точками: ', d);
    Readln;
end.

+ 0 -
Vladd2001
06 нояб. 2014 г., 11:50:42 (9 лет назад)

Какой язык?

+ 0 -
Atanya
06 нояб. 2014 г., 14:01:33 (9 лет назад)

Паскаль..

Ответить

Другие вопросы из категории

N factorial помогите плиз
срочно! только ответ
Тема - обработка символьных величин на Паскале. Ввести свою фамилию, имя и отчество как одно текстовое данное, используя пробел как разделитель.

Вывести на экран - фамилию; - имя; - фамилию и инициалы.
не понимаю, если я даже и начну выводить фамилию, как сделать так. чтобы выделялось только до пробела? ведь фамилии у всех разные. а программа должна быть универсальной для всех фамилий (т.е. фамилия вводится с клавиатуры)

Читайте также

Написать программу ПАСКАЛЬ вычисления расстояния между населёнными пунктами. 1)Вычислите расстояние между населёнными пунктами. 2)введите

исходные данные

3)масштаб карты 120 (кол-во км в одном см)

4)расстояние между точками изображающими населённые пункты если между ними 3.5 (см)...(должно выйти 420км)

5) расстояние между насел. пунктами ... км

Напишите пожалуйста программу. К завтрашнему дню надо. С Паскалем проблемы

Помоги,пожалуйстааа))

Разработать, ввести в ЭВМ и отладить программу для
расчёта действительного расстояния между городами, если известно расстояние
между ними на карте и масштаб карты

помогите пожалуйста решить задачи и закодировать их в программе visual foxpro 9.0!!!!!

1) определить время через которое встретятся два тела равноускоренно движущиеся навстречу друг другу,если известны их начальные скорости ускорения и начальное расстояние между ними.
2)даны целые числа m,n (0<m<или равно12,0<или равно n<60),указывающий момент времени:" m часов, n минут" .Определить наименьшеевремя(число полных минут),которое должно пройти до того момента когда часовая и минутная стрелки на циферблате совпадут.

ну оооочень нужно!!!!!!



Вы находитесь на странице вопроса "Ввести с экрана координаты двух точек, найти расстояние между ними.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.