Вычислить значения синусов в промежутке от 0 до 6.283, шаг 0,31415.ВСЁ

Вычислить значения синусов в промежутке от 0 до 6.283, шаг 0,31415.
ВСЁ Надобно СДЕЛАТЬ В ПАСКАЛЕ.
ЕСЛИ НЕ СЛОЖНО Растолкуйте

Задать свой вопрос
1 ответ
Var
  x: real;
begin
  x := 0;
  while x lt;= 6.283 do
   begin
    writeln('F(',x:0:1,') = ',sin(x)/x:0:2);
    x := x + 0.31415;
   end;
end.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт