Написать программу в Pascal ABC. Вычисление квадратного корня. Данные ввести с клавиатуры.
Program z1; var s,x:real; begin writeln('введите неотрицательное число, из которого будем извлекать квадратный корень'); readln(s); x:=sqrt(s); writeln(x); end.