• Составьте программу нахаждения суммы квадратов натуральных чисел от 15 до 25 . Пожалуйста помогите

Ответы 1

  • program p1;uses crt;var a,b,i:integer;beginfor i:=15 to 25 do begina:=a+i*i;b:=i*i;writeln('Сумма:',a,'(квадрат числа :',i,'=',b,')');end;write(a);end.
    • Автор:

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

Войти через Google

или

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

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

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