Напиши программу. дано целое число n (n 0). найти - вопрос №72744380122 от vitaliygrg 16.06.2020 23:15

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

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