Помогите пожалуйста!! Безотлагательно!! По представленной блок - схеме Составьте программу вычесления

Помогите пожалуйста!! Безотлагательно!! По представленной блок - схеме Составьте программку вычесления функции у при данном значении с клавиатуры значении х.

Задать свой вопрос
Артемий Каснер
а где задание?
1 ответ

var x: integer; y: real;

begin

readln(x);

If xlt;=-10 then  

y:=x*x+25-x

else If (-10lt;x) and (xlt;=10) then

y:=3+x

else y:=1/x;

writeln(y);

end.

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


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

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

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

Войти на сайт