- 21.10.2017 11:34
- Информатика
- remove_red_eye 16072
- thumb_up 7
Ответы и объяснения 1
Var
xa, xb, ya, yb: integer;
S: real;
begin
write('Введите значение xa=');read(xa);
write('Введите значение ya=');read(ya);
write('Введите значение xb=');read(xb);
write('Введите значение yb=');read(yb);
S:=sqrt(sqr(xb-xa)+sqr(yb-ya));
writeln('Длина отрезка=', S:5:1);
end.
- 22.10.2017 00:28
- thumb_up 45
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.