Помогите с задачкой пожалуйста. Вычислить значение суммы ряда Y(х) в произвольной точке х, если Y(х)=sinx + sinx^2 + sinx^3 + ... sinx^n величину x вводить.
Var x,St,S:real; n:integer; Begin Write('x = ');ReadLn(x); Write('n = ');ReadLn(n); St:=1; S:=0; For n:= 1 to n do Begin St:=St*x; S:=S+Sin(St); End; WriteLn('S = ',S); End.
мне отчет надо сдать по ней , да комментировать программу , что и как идет , а я не понимаю если честно )
скажите можете эту задачку решить ?
Дана строка символов ( 2-3 строки ) в файле F1. Составить функцию , формирующую новую строку : заменить все повторные вхождения символа пробел одним символом пробела , в начало строки добавить слово " HАЧАЛО " , в конец - слово " КОHЕЦ ". Записать новую строку в файл F1 после исходной.
Ага... Прошлые 2-3 раза эту задачку тоже выкладывали?
один раз , только та программа которую мне сделали , не работает
Дайте ссыль, посмотрю
https://znanija.com/task/24812164
Не смотрели еще?
Посмотрел сразу - бред там написан. Выложите задачку ещё раз, только с указанием языка. И версии этого языка, потому что одного только Паскаля тут может быть 6 разных версий: Turbo, Free, Delphi, ABC, Lazarus, ABC.NET
вы мне поможите ? я выложил )