Y=1/1-2/2-3/3-4/4-(...)-n/n Составить блок-схему и программу на паскале. Заранее спасибо

Ответы:
Анастасия Крутовская
03-05-2011 18:17

//Pascal ABC.NET v3.1 сборка 1172Var y:real; i,n:integer;begin readln(n); y:=1; for i:=2 to n do y:=y-i/i; writeln(y);end.Пример ввода:3Пример вывода:-1

Также наши пользователи интересуются:

Картинка с текстом вопроса от пользователя Маша Старостюк

⭐⭐⭐⭐⭐ Лучший ответ на вопрос «Y=1/1-2/2-3/3-4/4-(...)-n/n Составить блок-схему и программу на паскале. Заранее спасибо» от пользователя Маша Старостюк в разделе Экономика. Задавайте вопросы и делитесь своими знаниями.

Открой этот вопрос на телефоне - включи камеру и наведи на QR-код!