Ответы на вопрос:
Var i: longint; a: real; begin for i: =1 to 10 do //for нельзя делать по дробным числам, поэтому будем в цикле делить на 10 begin a: =i; //integer это целочисленный тип, поэтому присваиваем его значение к переменной типа real write(sin(a/10),' '); //синус от положительного write(/' '); //синус от отритцательного end; end.
Популярно: Информатика
-
Nickky20.08.2020 06:09
-
RMDEL09.02.2022 16:30
-
dashayudina0414.10.2021 09:33
-
yulyaahunova117.01.2020 09:05
-
benten243415.02.2023 05:49
-
dron4ik22605.08.2022 21:48
-
DityaDyavola04.04.2022 09:36
-
semzolotov10.01.2022 00:27
-
Levickay99116.01.2022 10:58
-
yuliyasss20.03.2021 08:19