PDA

Просмотр полной версии : Pascal.задача



Skoda
13.12.2006, 12:09
Помогите разобраться с заданием.
во-первых я его не понимаю. что дано. во-вторых. не знаю с какой стороны подходить. как такое написать. помогите кто может. очень выручите!!!!!
Дано натуральное число N. Вычислить

cos1 cos1 + cos2 cos1 + cos2 + ... + cosN

------ * --------------------- * --------------------------------------

sin1 sin1 + sin2 sin1 + sin2 + ... + sinN

Suicide
13.12.2006, 12:11
это всё что дано ? можешь написать задание целиком ?
я так понял надо получить сумму косинусов и синусов от 1 до числа N

Ull9
13.12.2006, 12:13
вполне достаточно. все ясно.

Suicide
13.12.2006, 12:17
var i,n:integer; sum:real;
writeln('введите число N');
readln(n);
for i to n-1 do
sum:=cos(i)*cos(i)+cos(i+1)*cos(i);

вообщем нечто вроде такого
хотя может я не прав паскаль уже подзабыл

KoVadim
13.12.2006, 13:15
Если условия задачи написано точно, тогда решение должно выглядеть так


program sum;
var i,n:integer;
sum:real;
begin
sum:=sqr(cos(1))/sqr(sin(1))+cos(2)*cos(1)/sin(2)/sin(1);
write('skoko ravno n?')
readln(n);
for i:=2 to n do
sum:=sum+cos(i)/sin(i);
writeln('Vasha summa=',sum);
end.

andriyBog
13.12.2006, 14:00
вобщето задание самое лёгко, сегодня уже 13 декабря порабы уже знать такие вещи Skoda , уже вроде как три месяца учишься

spector
13.12.2006, 15:20
Открывайте методичку и вперед.Задание довольно не тяжелое,т.к. сам щас учу паскаль 3 месяц и довольно удачно.

Skoda
14.12.2006, 10:59
вобщето задание самое лёгко, сегодня уже 13 декабря порабы уже знать такие вещи Skoda , уже вроде как три месяца учишься


честно говоря я учусь не три месяца а на заочке, причем в очень ускоренном ритме.

всем спасибо кто откликнулся!!!!

andriyBog
18.12.2006, 14:31
честно говоря я учусь не три месяца а на заочке, причем в очень ускоренном ритме.

всем спасибо кто откликнулся!!!!


Тогда всё с тобой ясно, один путь в книжный магазин и за учёбу,
второй в деканат заказывать контрольные