Напишите пожалуйста код программы в Pascal,которая вычисляет квадрат суммы первых N...

0 голосов
49 просмотров

Напишите пожалуйста код программы в Pascal,которая вычисляет квадрат суммы первых N чисел.Количество чисел (N) следует запросить у пользователя.


Информатика (22 баллов) | 49 просмотров
0

первых n-чисел чего (массива)?

0

или 1 2 3 4 и т.д.

0

1 2 3 4

Дан 1 ответ
0 голосов

Var
   i,n,a:integer;
Begin
  Writeln('Введите число');
  Readln(n);
  for i:= 1 to n do
    a:=a+i;
 Writeln('Квадрат суммы этих чисел равен ',sqr(a));
End.

(2.6k баллов)
0

Прошу прощения за столь долгий ответ.

0

Большое спасибо