20 БАЛЛОВ
Составить программу для решения следующих задач. Напишите программу, которая вычисляет сумму:
1) первых n натуральных чисел;
2) квадратов первых n натуральных чисел;
3) всех чётных чисел в диапазоне от 1 до n;
4) всех двузначных чисел
ПОЖАЛУЙСТА ОЧЕНЬ НАДО
Составить программу для решения следующих задач. Напишите программу, которая вычисляет сумму:
1) первых n натуральных чисел;
2) квадратов первых n натуральных чисел;
3) всех чётных чисел в диапазоне от 1 до n;
4) всех двузначных чисел
ПОЖАЛУЙСТА ОЧЕНЬ НАДО
More Questions From This User See All
Answers & Comments
Verified answer
begin
var n := ReadInteger('n =');
1.To(n).Sum.Println;
SeqGen(n, i -> i * i, 1).Sum.Println;
Range(2, n, 2).Sum.Println;
Range(10, 99).Sum.Print
end.