Помогите написать программу в Pascal.Задано число,если оно находится в спектре [0,10]

Помогите написать программку в Pascal.Задано число,если оно находится в спектре [0,10] то данное число возвести в квадрат, если нет, то вычислить квадратный корень из числа

Задать свой вопрос
1 ответ

Program zadacha;

var x:integer;

begin

 readln(x);

 if (xgt;=0) and (xlt;=10) then writeln(x*x)

                               else writeln(sqrt(x));

end.

Изъяснение:

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт