Вопрос по информатике:
С клавиатуры вводится последовательность из n чисел . Определите сумму максимального и минимального числа данной последовательности. Нарисовать блок схему !
Язык программирования : Паскаль .
Пожаловаться
- 03.05.2018 23:06
- Информатика
- remove_red_eye 12654
- thumb_up 23
Ответы и объяснения 1
Var min, max, i, k: integer; a: array[1..1000] of integer;
begin readln(k); readln(a[1]); for i := 2 to k do readln(a[i]); min := a[1]; max := a[1]; for i := 1 to k do begin if a[i] max then max := a[i]; end; writeln(max + min);end.
begin readln(k); readln(a[1]); for i := 2 to k do readln(a[i]); min := a[1]; max := a[1]; for i := 1 to k do begin if a[i] max then max := a[i]; end; writeln(max + min);end.
Пожаловаться
- 04.05.2018 07:42
- thumb_up 17
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы