Вопрос по информатике:
Как написать по информатике линейную программу на вычисление ?
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 11.11.2016 02:04
- Информатика
- remove_red_eye 12093
- thumb_up 15
Ответы и объяснения 1
Uses crt;
Var x1,y1, x2,y2, r: Real;
Begin // начало программы
Clrscr; // очистка экрана
Write('x1=');
ReadLn(x1); // ввод х1
Write('x2=');
ReadLn(x2); // ввод х2
Write('y1=');
ReadLn(y1); // ввод у1
Write('y2=');
ReadLn(y2); // ввод у2
r:=sqrt(sqr(x2-x1)+sqr(y2-y1)); // вычисление расстояния между точками
WriteLn('r=',r:5:3); // вывод результата
readkey; // ожидание нажатия клавиши
end.
- 12.11.2016 03:35
- thumb_up 41
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.