Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/5: Рейтинг темы: голосов - 5, средняя оценка - 4.60
Sasha000
0 / 0 / 0
Регистрация: 24.10.2017
Сообщений: 1
#1

Программа, которая заполняет массив a[1.10] случайными целыми числами

24.10.2017, 16:30. Просмотров 996. Ответов 1
Метки нет (Все метки)

Cоставьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10 и вычисляет сумму элементов с индексами от n до m включительно. Число m и n введите с клавиатуры.
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.10.2017, 16:30
Ответы с готовыми решениями:

Напишите программу, которая заполняет массив случайными целыми числами
Напишите программу, которая заполняет массив случайными целыми числами, вводит...

Программа заполняет двумерный массив (6х6) случайными числами на отрезке [-8,17],выводит его в виде таблицы
Дана такая задача: Программа заполняет двумерный массив (6х6) случайными...

Написать программу, которая заполняет элементы матрицы случайными числами a[n][n] и осуществляет вывод данных
Написать программу, которая заполняет элементы матрицы случайными числами a и...

Заполнить массив из 10 элементов целыми случайными числами от -5 до 5,
У меня тут вот такая задачка, помогите решить, пожалуйста) Заполнить массив из...

Составьте программу,которая заполняет массив a[1.10] случайными целым
Составьте программу,которая заполняет массив a случайными целыми числами в...

1
Puporev
Модератор
54352 / 41944 / 28978
Регистрация: 18.05.2008
Сообщений: 98,798
24.10.2017, 17:24 #2
Лучший ответ Сообщение было отмечено Sasha000 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
const k=10;
var a:array[1..k] of integer;
    i,n,m,s:integer;
begin
writeln('Массив');
randomize;
for i:=1 to k do
 begin
  a[i]:=1+random(11);
  write(a[i]:3);
 end;
writeln;
repeat
writeln('Введите диапазон 1<=n<m<=',k);
readln(n,m);
until (n>0)and(m>n)and(m<=k);
s:=0;
for i:=n to m do
s:=s+a[i];
write('Сумма=',s)
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
24.10.2017, 17:24

Заполнить двухмерный массив размера N*M случайными целыми числами
Помогите решить задачу: Заполнить двухмерный массив размера N*M случайными...

Заполнить массив случайными целыми числами в диапазоне [-5;20] и вывести их в строку с интервалом равным 5
Составить и реализовать программу на языке программирования. Заполнить массив...

Заполнить одномерный массив m[n] случайными целыми числами от a до b и вывести его на экран.Значения a,b,c,d,n взять из таблицы.
Заполнить одномерный массив m случайными целыми числами от a до b и вывести его...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru