Написать программу вычисления стороны квадрата по заданной площади
Var S:real; Begin Write('Введите площадь квадрата: ');ReadLn(S); WriteLn('Сторона квадрата: ',Sqrt(S)) End.