• Создать проект нахождения сумы чисел 1^2 + 2^2 + … + n^2 в TurboDelphі
    МОЛЮ ВАС. ПОМОГИТЕ.

Ответы 1

  • Вот тебе функция для подсчета суммы, проект форму, кнопки, едеты на твоих плечах. Код вставляй после implementation и используй примерно так:////////////////Label1.Caption:=inttostr( sums( strtoint( edit1.text ) ) );///////////////function sums(N: integer): integer;var i, t: integer;begin for i:=1 to N do t:=t+sqr(i); sums := t;end;
    • Автор:

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

Войти через Google

или

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

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

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