Задачи на Pascal

Ну выкладывайте.

1. Написать программу для определения x если 5^2*5^4*5^6*...*5^2x=b где b вводится пользователем.

2. Программы должна рассчитывать

y=sin(pi/2)-sin(3pi/4)+sin(5pi/8)-... где первые 100 слагаемых

попадающих в интервал от a до b.

а эту уже сделал?

Ага! Сделал

Дашь списать?

Без проблем:)

Паскаль... Где мои 16 лет...

Ни в первой, ни во второй задаче не могу уловить взаимосвязи между множителями и слагаемыми.

Это точно, полный текст задания?

Да полный. Там что-то типа прогрессии.

решение таково:

a:=2;

while not(exp(ln(5)*a)=b) do inc(a,2);

Только оно не будет работать потому что у Паскаля с точностью косяки. Он думает что exp(ln(5)*n) не равно 5^n.