- 21.02.2018 06:57
- Информатика
- remove_red_eye 19708
- thumb_up 39
Ответы и объяснения 1
Var
X1,Y1,X2,Y2:real;
Begin
Write('X1 = ');Read(X1);
Write('Y1 = ');Read(Y1);
Write('X2 = ');Read(X2);
Write('Y2 = ');Read(Y2);
Write('Расстояние между точками (',X1,';',Y1,') и (',X2,';',Y2,') = ',sqrt(sqr(X2-X1)+sqr(Y2-Y1)) )
End.
- 22.02.2018 15:42
- thumb_up 31
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.