Информатика Архивный вопрос

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

Нет комментариев

Ответы

Гость

Var a, z:longint;
Begin
Writeln('Введите любое целое число a');
Readln(a);
z:=sqrt(a);
Writeln('Квадратный корень из числа а равен: : ,z);
End. 

Нет комментариев

Похожие вопросы