|
Вопрос # 5 796/ вопрос открыт / |
|
Здравствуйте, эксперты! вычислить y=sin 1+sin 1,1+sin1,2+...+sin2
в паскале плииииз
 |
Вопрос задал: Vladik (статус: Посетитель)
Вопрос отправлен: 5 декабря 2011, 22:09
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Всего сообщений: 6; последнее сообщение — 7 декабря 2011, 12:36; участников в обсуждении: 3.
5 декабря 2011, 22:18: Вопрос перемещён из тематического раздела Pascal » Программирование на Pascal в раздел Лабораторный практикум » Pascal модератором Ерёмин А.А.
|
Толяныч (статус: 4-ый класс), 5 декабря 2011, 23:46 [#1]:
Учись сам, студент !
|
|
Егор (статус: 10-ый класс), 6 декабря 2011, 16:09 [#2]:
за пиво?
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
Мережников Андрей (статус: Абитуриент), 6 декабря 2011, 19:34 [#3]:
В чем вопрос? Что именно не получается?
|
|
Толяныч (статус: 4-ый класс), 7 декабря 2011, 01:52 [#4]:
Я думаю, что засада в одном из действий :
- включить комп
- на клаве натюкать что-нить вроде :
x := 1.0 ; y := sin (x) ;
repeat
x := x + 0.1 ;
y := y + Sin (x) ;
until (x > 1.999) ;
- скормить это компилятору.
|
|
Егор (статус: 10-ый класс), 7 декабря 2011, 07:13 [#5]:
не. вот тру-путь настоящего индийского программиста:
uses math;
var y : real;
begin
y := sin(1)+sin(1.1)+sin(1.2)+sin(1.3)+sin(1.4)+sin(1.5)+sin(1.6)+sin(1.7)+sin(1.8)+sin(1.9)+sin(2);
writeln(y);
end.
Опасайтесь багов в приведенном выше коде; я только доказал корректность, но не запускал его.
— Donald E. Knuth.
|
|
Толяныч (статус: 4-ый класс), 7 декабря 2011, 12:36 [#6]:
Интересно, если бы последний элемент был не 2, а 2000, на которой строчке компилятор взвыл бы : "за^^^^^, блин !" ?
|
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|