• Дан ряд чисел 1,3,5,7... Найти среднее арифметическое первых n чисел и максимальный элемент)
    написать программу на языке Pascal

Ответы 1

  • var n,i,s:integer;beginread(n);s:=-1;for i:=1 to n do begins:=s+2;end;writeln(s);end.
    • Автор:

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

Еще вопросы

Войти через Google

или

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

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

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