< >

составить  программу нахождения модуля действительного числа вводимого с клавиатуры

Ответы

Ответ дал: BlackW1nd
0
Var x:real;
Begin
 write('x=');
 readln(x);
 x:=abs(x);
 write('|x|=',x);
End.
Похожие вопросы
Русский язык
2 года назад
помогите написать эссе на тему музыка в нашей жизни что бы были красивые слова 
Русский язык
2 года назад
Прочитайте стихотворение Е.Благининой "Эхо". Эхо,эхо! Вот потеха! Обезьяна это эхо! Это эхо каждый раз Передразнивает нас. Выпиши из текста предложения,в которых:а)эхо сравнивается с
Математика
7 лет назад
75 баллов за решение
Математика
7 лет назад
5,6-(3,108-0,82-0,308)=
История
10 лет назад
В годы Первой мировой войны город на Неве получил название : а) Питерсфилд б) Питисбург в) Петроград
Алгебра
10 лет назад
помогите решить пожалуйста!!! x^2-7x<6x-15-x^2 
Физика
10 лет назад
1.Космонавт на Земле притягивается к ней с силой 800 Н. С какой силой он будет притягиваться к Луне, находясь на ее поверхности, если радиус Луны приблизительно в 4 раза, а масса - в 100 раз меньше,
Геометрия
10 лет назад
Дано. треуг. ABC и треуг. A1B1C1,угол С=С1, угол А=A1 a) AC=5cm, AB=15 A1C1=8, A1B1=? d) A1C1=4 cm, A1B1=7 cm AB=21 AC=? угол А=A1 =cos A=cos A1