Вывести на экран все значения функции y=sinX
на промежутке от -1 до 1 с шагом 0,1.
паскаль

Var i:longint; 
    a:real;

begin
for i:=1 to 10 do //for нельзя делать по дробным числам, поэтому будем в цикле делить на 10
 begin
   a:=i;  //integer это целочисленный тип, поэтому присваиваем его значение к переменной типа real
   write(sin(a/10), );//синус от положительного
   write(sin(-(a/10)), );//синус от отритцательного
 end;

end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.