Информатика Архивный вопрос

Напишите программу, которая вычисляет сумму:
а) первых n натуральных чисел;
б) квадратов первых n натуральных чисел;

Нет комментариев

Ответы

Гость

A) begin write(seqgen(readinteger(), x -> x + 1, 0).Sum); end.
б) begin write(seqgen(readinteger(), x -> x * x, 1).Sum); end.

Нет комментариев

Похожие вопросы