найдите значение переменной А после выполнения программы
VAR
A:INTEGER
BEGIN
A:=SQRT(16):
END

0