5) в последовательности из n вещественных чисел найти наивеличайший элемент

5) в последовательности из n вещественных чисел найти наибольший элемент последовательности
3)вычислить сумму нечетных чисел , не превосходящих n. При вводе с клавиатуры числа 5, итог= 1+3+5=9

Задать свой вопрос
1 ответ
// PascalABC.NET 3.3, сборка 1579 от 18.11.2017
// Внимание! Если программа не работает, обновите версию!

5)
begin
  Writeln('Max=',ReadSeqReal('Введите числа:',ReadInteger('n=')).Max)
end.

Пример
n= 8
Введите числа: 4.12 5 1.48 -6 0 7.3 5.12 0.005
Max=7.3

3)
begin
  Writeln('Sum = ',Range(1,ReadInteger('n ='),2).Sum)
end.

Пример
n = 5
Sum = 9
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт