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

+ описать, что делает каждая строка программы.

Var a, b:real; / / Создание переменных а и б

begin / / Начало программы

Writeln ('Введите число ') ; / / Написание "Введите число"

Read (a) ; / / Считывание числа

b:=sqrt (a) ; / / Нахождение квадратного корня

Writeln ('Квадратный корень = ', b) ; / / Написание "Квадратный корень = " и корня числа

End.//Конец программы