• Напишите пожалуйста программу с помщью Паскаля:Дана последовательность 5 9 13 17 21 25 29 33 37 41 45 49. Составьте программу для подсчета числа слагаемых сумма которых равна 324

Ответы 1

  • var sum, i: integer;

     

     

    begin

      sum := 5; i := 1;

      while (sum < 324) do

      begin

        sum := sum + 4;

        i := i + 1;

      end;

      writeln ('Слогаемых: ');

      write (i);

    end.

      

    • Автор:

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

Войти через Google

или

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

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

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