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

Умоляю! Очень надо ! Хоть частично ! есть 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)​​​​

Ответ:
dashademidkinaozz914
dashademidkinaozz914
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
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?