Программисти ! (паскаль)Оператори програми переставлені в випадковому порядку. Складіть з нихпрограму для обчислення функції (оператори можна копіювати і вставляти всередовище програмуванняelse if (x>= -10) and (x<= 10)else y:=2*x+1;Var x, y: real;if x<-10then y:= 3*x*x*x - x*xWriteln ('y= ', y:4:2); End.then y:= sqrt(10-x)Program Fynksija;BeginWrite ('x= ');Readln (x)
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Составьте алгаритм как приготовить яблочный пирог
Автор: Александрович
Построить блок-схему для вычисления объёма цилиндра
Автор: david-arustamyan1
скажыте там короче ак жасыл Кызыл сарыосы тортеуынын быры
Автор: praskovya17
Моделью организации знаний можно считать: * плз
Автор: Sinelnikov1650
50 перевести в десятичную cc и обратно
Автор: petrova-kate3
Запиши десятичное число 1235 в системе счисления с основанием 6.
Автор: spodobnyi
Найти рецепт - алгоритм (салата или блюда)
Автор: mbudilina
3D модельдеу дегеніміз не?
Автор: Struev730
Правильная рограмма на PascalABC.NET:
Program Fynksija;
Var x, y: real;
Begin
Write ('x= ');
readln(x);
if x<-10 then y:= 3*x*x*x - x*x
else if (x>= -10) and (x<= 10) then y:= sqrt(10-x)
else y:=2*x+1;
Writeln ('y= ', y:4:2);
End.