Ответы на вопрос:
Var x,y,n,m,s,z: real; i,k: integer; begin write('введите начало и конец диапазона по х'); read(n,m); write('введите шаг расчета по х'); read(z); k: = round((m - n)/z)+1; x: =n; for i: = 1 to k do begin y: = x * 34* 2*sin(x); writeln(x: 4: 1,y: 11: 6); x: = x + z; end; end.
Популярно: Информатика
-
batareya66607.08.2020 01:17
-
kall422.02.2021 10:59
-
delacourr22.12.2022 01:38
-
Didasret19.06.2021 14:32
-
НадеждаАрико10.03.2022 05:10
-
vauguq05.09.2022 15:07
-
vorobeowmikhai21.01.2023 23:59
-
Olya55555605.06.2021 12:30
-
Скотч7Рулит15.09.2021 07:45
-
danik17415.05.2022 22:53