• Составьте алгоритм для вычисления произведения чисел 5,10,15......55.

    У меня есть начало, вот оно закончите пж:

    r;=5, n:=55;

    i:=i+5.

     

Ответы 2

  • Var i,s:integer;

    begin

    i:=5; s:=1;

     while i<=55 do begin

    s:=s*i;

    i:=i+5; 

    end. 

    writeln(s);

    end.

     

     

     

     

     

     

     

     

     

    • Автор:

      kellyqbbt
    • 6 лет назад
    • 0
  • Можно использовать конструкцию

    H=1;

    for i= 5 to 55 step 5 do

    H=H*i;

     

    Извините, могут быть неточности в синтаксисом, Паскаль использовал лет 15 назад, забыл...

  • Добавить свой ответ

Еще вопросы

Войти через Google

или

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

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

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