сервис вопросов и ответовЗаполнить массив из 10 элементов случайными числами и сделать реверс всех элементов, кроме первого
5-9 класс|
|
Adel94g
04 февр. 2015 г., 19:29:38 (9 лет назад)
KiraCinaridze
04 февр. 2015 г., 21:43:14 (9 лет назад)
uses crt;
var a:array[1..10] of Integer;
i,j:Integer;
procedure rep; var k:Integer; begin k:=a[ i];a[ i]:=a[j];a[j]:=k; end;
begin
randomize;clrscr;
for i:=1 to 10 do a[ i]:=random(101);
for i:=1 to 9 do for j:=i+1 to 10 do if a[ i] mod 10 > a[ j] mod 10 then rep;
for i:=1 to 10 do write(a[ i],' ');
end.
Ответить
Другие вопросы из категории
Читайте также
ССССРРРРРРРРРРРРРРЛОООООООООООЧЧЧЧЧЧЧЧНООООООООО!!! 1. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
решить через паскаль через массивы)) 1.Дан одномерный массив из 10 элементов. Заменить все большие 7 члены массива числом 7. Найти количество
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.
Заполнить массив из 10 элементов случайными числами в интервале [-10...10] и выполнить инверсию отдельно для 1 и 2 половин массива.
Пример:
Исходный массив:
4 -5 3 10 -4 -6 8 -10 1 0
-4 10 3 -5 4 0 1 -10 8 -6
Решить задачи с помощью Паскаля:
1. Заполнить массив из 10 элементов случайными числами в интервале [0..100] и отсортировать его по последней цифре.
2. Заполнить массив из 10 элементов случайными числами в интервале [0..100] и отсортировать первую половину по возрастанию, а вторую- по убыванию. Здесь решать лучше методом выбора.
Вы находитесь на странице вопроса "Заполнить массив из 10 элементов случайными числами и сделать реверс всех элементов, кроме первого", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.