• Умоляю помогите пожалуйста срочно
    Использую оператор for, напишите программу , вычисляющую сумму квадратов первых ста натуральных чисел

Ответы 1

  • Var  i,a:integer;Begin  for i:= 1 to 100 do    a:=a+sqr(i);  write('Сумма квадратов первых ста натуральных чисел равна ',a);End.
    • Автор:

      amani
    • 6 лет назад
    • 0
  • Добавить свой ответ

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years