Форум программистов, компьютерный форум, киберфорум
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/15: Рейтинг темы: голосов - 15, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 23.03.2016
Сообщений: 10
1

Случайным образом заполнить одномерный массив целых чисел А [i], где i = 1, 2, ., n. Вывести этот массив

26.09.2016, 17:16. Показов 2870. Ответов 1
Метки нет (Все метки)

1. Значение элементов в обратном направлении
2. Значение элементов с четными индексами
3. Значение элементов с нечетными индексами
4. Значение парных элементов массива
5. Значение нечетных элементов массива
6. Значения элементов массива> 50
7. Значение элементов массива <50
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
26.09.2016, 17:16
Ответы с готовыми решениями:

Сформировать случайным образом массив из 20 целых чисел из заданного отрезка и вывести на экран
Программа должна сформировать случайным образом массив из 20 целых чисел из отрезка и вывести...

Отсортировать одномерный массив из 20 целых чисел, заданный случайным образом
Отсортировать одномерный массив из 20 целых чисел, заданный случайным образом, метод выборки.

Одномерный массив из 7 элементов заполнить случайным образом числами от 5 до 9. Заменить все элементы массива меньше 5 нулями
Одномерный массив из 7 элементов заполнить случайным образом числами от 5 до 9. Заменить все...

Дан массив целых чисел (n=25), заполненный случайным образом числами из промежутка [-20,85]
Дан массив целых чисел (n=25), заполненный случайным образом числами из промежутка 1)Удалить из...

1
Эксперт Pascal/Delphi
2380 / 1292 / 1491
Регистрация: 29.08.2014
Сообщений: 4,626
27.09.2016, 05:34 2
Лучший ответ Сообщение было отмечено Памирыч как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
const n=10;
var
  a:array[1..n] of integer;
  i:integer;
begin
  randomize;
  write('A:');
  for i:=1 to n do begin
    a[i]:=random(101);
    write(a[i]:4);
  end;
  writeln;
  writeln('1.'); for i:=n downto 1 do write(a[i]:4);writeln;
  writeln('2.'); for i:=1 to n do if not odd(i) then write(a[i]:4);writeln;
  writeln('3.'); for i:=1 to n do if odd(i) then write(a[i]:4);writeln;
  writeln('4.'); for i:=1 to n do if not odd(a[i]) then write(a[i]:4);writeln;
  writeln('5.'); for i:=1 to n do if odd(a[i]) then write(a[i]:4);writeln;
  writeln('6.'); for i:=1 to n do if a[i]>50 then write(a[i]:4);writeln;
  writeln('7.'); for i:=1 to n do if a[i]<50 then write(a[i]:4);writeln;
end.
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
27.09.2016, 05:34

Дан массив целых чисел (N=15), заполненный случайным образом числами из промежутка [-25, 31].
помогите пожалуйста написать программу: Дан массив целых чисел (N=15), заполненный случайным...

создать одномерный массив X[1..10] случайным образом.Вывести его в строку.Затем сделать циклическую перестановку
создать одномерный массив X случайным образом.Вывести его в строку.Затем сделать циклическую...

Заполнить массив А (N) случайным образом
1) заполнить массив А (N) случайным образом целыми числами с диапазона ; 2) вывести элементы...

Заполнить двухмерный массив случайным образом
помогите пож, нужно заполнить двухмерный массив случайным образом, у меня что-то выдает ошибку.....


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2022, CyberForum.ru