Регистрация
Войти
Стать экспертом Правила
Информатика

Дано целое числоИзвлечь квадратный корень.

ОТВЕТЫ
var a, z:longint;
Begin
Writeln('Введите любое целое число a');
Readln(a);
z:=sqrt(a);
Writeln('Квадратный корень из числа а равен: : ,z);
End. 
743
Контакты
Реклама на сайте
Спрошу
О проекте
Новым пользователям
Новым экспертам