Ответы на вопрос:
// pascalabc.net 3.1, сборка 1250 от 28.05.2016 begin var x,a,x1,x2,delta,lambda,y: real; write('введите границы изменения аргумента и шаг: '); read(x1,x2,delta); a: =1.44; x: =x1; repeat lambda: =sqr(tan(x*a/2*pi)); y: =power(x*(2.7*power(x,1.35)+lambda),1/3); writeln('x=',x,' y=',y); x+=delta until x> x2 end. тестовое решение введите границы изменения аргумента и шаг: 1.2 2.0 0.2 x=1.2 y=1.63776729113963 x=1.4 y=1.81249323168809 x=1.6 y=2.04691849426225 x=1.8 y=2.40906764678559 x=2 y=4.09613421404126
Популярно: Информатика
-
luska05915.06.2021 05:35
-
AlexPvP25.01.2023 23:38
-
Anfisac3t25.12.2022 00:26
-
volodjpanchuk1910.02.2020 09:48
-
аааа28714.11.2022 09:12
-
dja4enkodanil1626.03.2021 23:14
-
visokolova18.01.2021 20:45
-
ольга172328.07.2022 02:15
-
polinaleskevic16.02.2023 15:55
-
LIZETTA11117.12.2020 11:25