сервис вопросов и ответовдана последовательность чисел. найтидана последовательность чисел. найти минимальное и максимальное число и вычислить их среднее арифметическое. в
10-11 класс|
|
паскале
Капашоня
28 дек. 2014 г., 18:52:15 (9 лет назад)
Natwik46
28 дек. 2014 г., 19:27:09 (9 лет назад)
Uses crt;
Var A:array[1..10]of integer;
q,w,i,k,j:integer;
begin
randomize;
for q:= 1 to 10 do
begin
A[q] := random(256);
write(A[q]:4)
end;
for i := 1 to 9 do
for j := 1 to 10 - i do
if A[j] > A[j + 1] then begin
k := A[j];
A[j] := A[j + 1];
A[j + 1] := k;
end;
for i:=1 to 10 do
w:=(A[1]+A[10])/2;
write(w)
Ответить
Другие вопросы из категории
Помогите пожалуйста)
Каков минимальный объем памяти, достаточный для хранения любого растрового изображения размером 128*128 пикселей, если в изображении используется палитра из 65536 цветов?( Саму палитру хранить не надо)
Играют двое.Первый участник игры называет произвольное целое число, не превышающее десяти.Второй игрок прибавляет к названнаму числу свое целое число,
тоже тоже не превышающе десяти, и сообщает новой сумму.К новой сумме второй прибавляет число и т.д. до тех пор, пока окончательной суммой не окажется число 100. Выигрывает тот, кто первым достигнет 100. Как должен действовать первый игрок, чтобы выиграть.
Читайте также
Дана матрица размерностью nxn найти
Дана матрица размерностью nxn найти минимальный элемент среди элементов расположенных над главной диагональю матрицы. Найти квадрат разности среди арифметических значений элементов матрицы ,находящихся ниже и выше главной диагонали
Задачи в Paskal ABC
1.Дан радиус окружности. Вычислить длину окружности и площадь круга, ограниченного этой окружностью.
2.Даны 2 положительных числа. Вычислить их среднее арифметическое и среднее геометрическое.
33. Последовательность чисел
Вводится последовательность целых чисел, заканчивающаяся нулем. Преобразовывать последовательность следующим образом:
1) заменить отрицательные числа в последовательности на их модули и вывести получившуюся последовательность;
2) в полученной последовательности заменить четные числа на максимальное число последовательности, вывести результат;
3) в полученной последовательности вычесть из каждого члена последовательности 2, вывести результат;
4) в полученной последовательности заменить отрицательные на 0, вывести результат.
Пример.
Последовательность: 1 2 3 0
1) 1 2 3
2) 1 3 3
3) –1 1 1
4) 0 1 1
Вы находитесь на странице вопроса "дана последовательность чисел. найтидана последовательность чисел. найти минимальное и максимальное число и вычислить их среднее арифметическое. в", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.