В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
ndan1k
ndan1k
23.11.2021 06:16 •  Информатика

Умоляю! Очень надо ! Хоть частично ! есть 2 языка (укр.в.)Оператори програми переставлені в випадковому порядку. Складіть з них
програму для обчислення функції (оператори можна копіювати і вставляти в
середовище програмування).

(рус.в)Операторы программы переставлены в случайном порядке. Составьте из них
программу для вычисления функции (операторы можно копировать и вставлять в
среду программирования).

1)else if (x>= -10) and (x<= 10)
2)else y:=2*x+1;
3)Var x, y: real;
4)if x<-10
5)then y:= 3*x*x*x - x*x
6)Writeln ('y= ', y:4:2); End.
7)then y:= sqrt(10-x)
8)Program Fynksija;
9)Begin
10)Write ('x= ');
11)Readln (x)​​​​

Показать ответ
Ответ:
lekhalis2002
lekhalis2002
10.05.2021 19:51

8, 3, 9, 10, 11, 4, 7, 1, 5, 2, 6

Program Fynksija;

var x, y:real;

begin

write('x= ');

readln(x);

if x<-10 then

y:=sqrt(10-x)

else if (x>= - 10) and (x<=10) then

y:=3*x*x*x-x*x

else

y:=2*x+1;

writeln('y= ', y:4:2);

end.

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота