< >

Написать программу на языке Паскаля для вычисления S=1^1+2^2+3^3+...+n^n

Ответы

Ответ дал: Hasl1337
1

var
  n, i: integer;
  s: real;
begin
  readln(n);
  for i := 1 to n do
    s := s + exp(i*ln(i));
  writeln(s);
end

Похожие вопросы
Қазақ тiлi
1 год назад
Дневниковая запись про путешествия древнего города Казахстана
Английский язык
1 год назад
Помогите пожалуйста! Срочно нужно! Упражнение 3
Русский язык
2 года назад
найти причастия в тексте: Странное изречение Идти против течения. Идти против течения- Это всегда исключение. Это быть глупым, по мнению Тех, кто плывет по течению: Стихия бывает жестока К
Английский язык
2 года назад
помогите пожалуйста домашку
Информатика
7 лет назад
В ячейке электронной таблицы В4 записана формула =С2+$A2. Какой вид приобретет формула, если ячейку В4 скопировать в ячейку D5?
Геометрия
7 лет назад
Помогите решить номер 9 и 10.
Математика
8 лет назад
Рассмотрите рисунок 5.18.Какая дробь на координатном луче соответсвует подстройки подставке домбры (точке А), какая - гриф домбры (точке В), какая - начальной точке головки (точке С)? Напиши точки
Математика
8 лет назад
В автобусе ехали 10мужчин и 6женшин. На остановке сели еще 2 человека и никто не вышел.сколько стало..?