Напиши программу. дано целое число n (n 0). найти - вопрос №7273536012 от хопхэйлалалэй1 12.12.2022 19:19

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 (получим целое число.)

хопхэйлалалэй1 · 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....