Составить программу в паскале: Дано х(вводится с клавиатуры) найдите y=sqrt((2*x+3)/(x-4))
Var x: real; begin readln(x); write(sqrt((2 * x + 3) / (x - 4))); end.
Решить в ПАСКАЛЕ В массиве Z состоящем из 6 чисел все отрицательные элементы заменить их модулями. Полученный массив вывести. С ПОМОЩЬЮ ДАТЧИКА СЛУЧАЙНЫХ ЧИСЕЛ!
Помоги пожалуйста