Ответы на вопрос:
pascal
Объяснение:
program func;
var x, y: real;
begin
Write('Введите значение аргумента x = ');
ReadLn(x);
y := 2 * (x + abs(sqr(x - 1)));
WriteLn('Y(', x, ') = ', y:1:2);
end.
Популярно: Информатика
-
Andreytsoy103.08.2022 21:38
-
nikita123253409.08.2020 12:51
-
2005лизок08.06.2021 21:54
-
Диа77315.02.2023 16:57
-
Chelyabin04.08.2022 18:44
-
mastervydy03.04.2020 01:33
-
ерик1284006.02.2021 07:28
-
Ver2al27.08.2022 10:21
-
orynbasar200126.11.2022 18:27
-
02Milka0222.02.2020 17:45