Паскаль, Pascal. Решения Паскаль. Всё для Паскаль...
Главная
Оформить заказ
Тарифы
Оплата
СОФТ
Контакты
О проекте
Навигация Паскаль:
Справочник Паскаль
Алгоритмизация Паскаль
Файловый менеджер Паскаль
Услуга "Объяснения"
Подтверждение решения
Готовые решения задач
Компиляторы паскаль
Готовое решение задачи Паскаль. Решения Pascal. Задачи паскаль. Задачи pascal
Условие Задачи:
Вычислить y=sin1+sin1.1+sin1.2+…+sin2
Просмотров
:
631
Объяснение
:
-
Отзывов
:
0
РЕШЕНИЕ:
program p1; var y,i:real; begin i:=1; y:=sin(1); while (i<2.01) do begin i:=i+0.1; y:=y+sin(i); end; writeln('Y= ',y:0:3); readln; end.
нажми на эту область и скопируй решение
© 2008 - 2012 Pascal, Паскаль, Турбо Паскаль, Turbo pascal.
