сервис вопросов и ответовРебят!!! Срочно!!! Помогите с информатикой пожалуйста
10-11 класс|
|
Вычислить разность между наибольштм и наименьшим элементами массива
Ali4kO
28 авг. 2013 г., 19:37:35 (10 лет назад)
Spaezzz
28 авг. 2013 г., 20:20:31 (10 лет назад)
var A: array [1..100] of integer;i,max,min,s: integer;beginrandomize;for i := 1 to 100 do beginA[i] := random(100);end;max := 1;for i := 2 to 100 do beginif (A[i] > A[max]) then max := i;end;min := 1;for i := 2 to 100 do beginif (A[i] < A[min]) then min := i;end;s := A[max] - A[min];writeln(s);end.
Ответить
Другие вопросы из категории
На бейсике Даны массивы A(m) и B(m), m<=12 Сформулировать массив С по правилу: C1=Bm+A1 C2=Bm-1+A2
------------
Cm=B1+Am
Найти сумму S элементов массива С. Вывести на печать массивы A,B,C и полученную сумму S..
. Написать программу, которая вводит массив из N целых чисел и выводит на экран этот же массив в прямом и обратном порядке. Протестировать программу на
произвольных массивах, состоящих из 1 числа, из 5 чисел, из 10 чисел.
Читайте также
помогите с информатикой,пожалуйста)
Нужно записать фрагмент программного кода,который получает слово романтика из слова информатика и выводит результат на экран
Вы находитесь на странице вопроса "Ребят!!! Срочно!!! Помогите с информатикой пожалуйста", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.