Создать массив из 10 элементов. Заполнить его случайными числами от 0 до 9. Посчитать сумму элементов.
5-9 класс
|
Спасибо!
var
a :array [1..10] of integer;
i :integer;
begin
randomize;
for i:=1 to 10 do
a[i]:= random(9);
end.
Другие вопросы из категории
(сделайте в паскале)
очереди. Протестировать программу на следующих исходных данных: а) Номер покупателя – 5. Время обслуживания отдельных покупателей (в минутах): 1 1.5 2 1.5 2.5 3 1.5 1 б) Номер покупателя – 7. Время обслуживания отдельных покупателей (в минутах): 1 1.5 2 1.5 2.5 3 1.5 1
Читайте также
2.Дан массив целых чисел из 25 элементов. Заполнить его случайными числами от 0 до 50. Заменить все четные элементы на их квадраты, а нечетные удвоить.
Найти сумму элементов данного массива.
2. Заполнить одномерный массив, состоящий из 10 элементов, случайными числами от-15 до 35.
Найти значение максимального элемента массива.
таких членов.
2.Дан массив из 10 элементов. Найти количество элементов с четными индексами.
3.Дан массив из 10 элементов. Найти наибольший элемент массива.
б)Напишите программу, которая массив из 20 элементов заполнит неповторяющимися целыми числами и выведет на экран элементы с нечетными индексами.