Помогите решить задачку на Pascal ABC, пожалуйста.Для данного целого x отыскать

Помогите решить задачу на Pascal ABC, пожалуйста.
Для данного целого x отыскать значение последующей функции f, принимающей значения целого типа:
f(x)= 9x/17 при xlt;1 либо xgt;5
x^2+81 (под корнем) , в неприятном случае.

Задать свой вопрос
1 ответ
Var
  x,f:real;
begin
  Write('x='); Read(X);
  if (xlt;1) or (xgt;5) then f:=9*x/17
  else f:=Sqrt(x*x+81);
  Writeln('f(x)=',f)
end.
Валек Лотев
СПАСИБО Громадное!!!!!
, оставишь ответ?
Имя:*
E-Mail:


Последние вопросы

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

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

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

Войти на сайт