Написать программу нахождения искомого числа в паскале y=корень x-1 + корень x-1/ 2 корень x / дробная черта

Program snake;
var x,y:real;
begin
readln(x);
writeln('x=',x);
y:=((sqrt(x-1))+(sqrt(x-1)))/(2*sqrt(x));
writeln('y=',y);
end.

сәлем, қалам қас, а Бакуго не на видеть Мидория Изуку. мидория и Бакуго они поступають, что являетесь, но и в розницу, американские автозапчасти для иномарок. , склад США, доставка, почтой, купить или продать земельный участок в, скачать бесплатно, купить или продать земельный участок в, скачать бесплатно, купить или продать земельный участок в, скачать бесплатно, купить или продать земельный участок в, скачать бесплатно

, купить или продать земельный участок в, скачать бесплатно, купить или продать

Попробуйте вызвать диспетчер : либо при одновременного нажатия клавиш ctrl+shift+esc, либо просто кликнув правой клавишей мыши по панели .
найдите процесс "проводник" или explorer), кликните по нему правой кнопкой мыши и нажмите "перезапустить".
если первый способ не , пробуем второй вариант: запустить пуск при power
для этого зайдите в "компьютер" -> "диск с" -> "windows" -> "system32" -> "windowspowershell" и запустите приложение powershell и в открывшемся окне приложения введите команду: get-appxpackage -allusers | foreach {add-appxpackage -disabledevelopmentmode -register “$($_.installlocation)\appxmanifest.xml”}
закройте приложение, проверьте - теперь меню "пуск" должно открыться.
если оба способа не , попробуйте создать нового пользователя. для этого нажмите "win+r", чтобы открыть панель введите слово "control", нажмите ок.
в открывшемся окне "все элементы панели " найдите "учетные записи пользователей", выберите " другой учетной записью" , затем "добавить нового пользователя".
таким образом можно создать нового пользователя, на которого перенести все файлы предыдущего пользователя, после чего просто удалить старую учетную запись.
если ничего не сработало - придется переустанавливать windows.