Напишите программу на языке PascalРазведчики-математики для того, чтобы опознать своих, используют числовыепароли. Услышав число-пароль, разведчик должен возвести его в квадрат исказать в ответ первую цифры дробной части полученного числа. Напишитепрограмму, которая по полученному паролю (вещественному числу) вычисляетчисло-ответ.Пример:Введите пароль: 1.92Ответ: 6потому что 1,922 = 3,6864…, первая цифра дробной части – 6