Напиши программу. дано целое число n (n 0). найти - вопрос №012227273761 от Danya135evlanov 28.10.2022 15:05

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

Danya135evlanov · 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....