Напиши программу. дано целое число n (n 0). найти - вопрос №0127273936 от даяна92 07.04.2023 05:44

Question

Информатика: Напиши программу. дано целое число n (n 0). найти сумму (n + 1)^2 + (n + 2)^2 + … + (2•n)^2 входные данные: ввести целое число n (1 =n =10). выходные данные: вывести сумму (n + 1)^2 + (n + 2)^2 + … + (2•n)^2 (получим целое число.)

даяна92 · Answer

Var    i, n: integer;    s: longint;begin    readln(n);    for i := 1 to n do        s := s + (n + i) * (n + i);        writeln(s);end....