Ответы на вопрос:
Var x, y, a, b, h : real; begin write('введите a: '); readln(a); write('введите b: '); readln(b); write('введите h: '); readln(h); x : = a; while x < = b do begin writeln(x, ' - ', sin(x) + tan(x)); x : = x + h; end; end.
Популярно: Информатика
-
ponhik413.03.2022 13:14
-
naletova197425.01.2021 13:03
-
sofikri200720.07.2020 06:51
-
правда1408.06.2023 19:13
-
tural2529.01.2022 05:45
-
belover15.12.2021 14:35
-
yagodka34308.06.2023 21:57
-
olyailysha3126.08.2022 02:06
-
coolbembel19.06.2020 14:01
-
Vlad01093421.09.2022 18:17