Форум программистов, компьютерный форум, киберфорум
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.60/30: Рейтинг темы: голосов - 30, средняя оценка - 4.60
0 / 0 / 0
Регистрация: 26.03.2010
Сообщений: 10
1

массив из 20 элементов заполняется случайными целыми числами в диапазоне от0 до 100 и выводит на экран в строку. Массив сортируется классическим спосо

30.03.2010, 17:33. Показов 5912. Ответов 2
Метки нет (Все метки)

массив из 20 элементов заполняется случайными целыми числами в диапазоне от0 до 100 и выводит на экран в строку. Массив сортируется классическим способом. ПОМОГИТЕ ПРОШУ ПОЖАЛУЙСТА!!!
__________________
Помощь в написании контрольных, курсовых и дипломных работ здесь
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
30.03.2010, 17:33
Ответы с готовыми решениями:

Массив заполняется случайными целыми числами в диапазоне от 0 до 100
Пользователь задает размер массива. Массив заполняется случайными целыми числами в диапазоне от0 до...

Заполнить массив из 100 элементов случайными целыми числами в диапазоне от 1 до 100
Мне очень нужна помощь, надеюсь откликнетесь... помогите написать, пожалуйста! 1. Заполнить...

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

Массив В(15) заполнить целыми случайными числами в диапазоне от 1 до 100
Массив В(15) заполнить целыми случайными числами в диапазоне от 1 до 100. Построить строку маску...

2
Студент
498 / 344 / 162
Регистрация: 15.03.2010
Сообщений: 601
30.03.2010, 17:50 2
Лучший ответ Сообщение было отмечено динара spirit как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
program pr1;
var a:array[1..30] of integer; i,n:byte; pr:boolean;
begin
  writeln('Введите размерность массива');
  readln(n);
  writeln('Массив');
  for i:=1 to n do
  begin
    a[i]:=random(101);
    write(a[i],', ');
  end;
  writeln;
  pr:=true;
  while pr do
  begin
    pr:=false;
    for i:=1 to n-1 do
    if a[i]>a[i+1] then begin
    a[i]:=a[i]+a[i+1];
    a[i+1]:=a[i]-a[i+1];
    a[i]:=a[i]-a[i+1];
    pr:=true;
                     end;
  end;
  writeln('Отсортированный массив');
  for i:=1 to n do
  write(a[i],', ');
  writeln;
end.
Добавлено через 44 секунды
вроде так...
1
401 / 312 / 74
Регистрация: 17.03.2010
Сообщений: 1,119
30.03.2010, 17:54 3
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
var
 Arr : array [1..20] of word;
 i, j, t : word;
begin
 //Заполнение
 Randomize;
 for i := 1 to 20 do
  Arr[i] := Random(100);
 //Сортировка пузырьком
  for j:=1 to 20 do
   for i:=1 to 20-j do
    if Arr[i] > Arr[i+1] then
    begin
     t := Arr[i];
     Arr[i] := Arr[i+1];
     Arr[i+1] := t;
    end;
end;
1
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
30.03.2010, 17:54

Пользователь задает размер массива и он заполняет массив случайными целыми числами, в диапазоне от -100 до 100
Как это реализовать

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

Заполните массив из N элементов случайными целыми числами в диапазоне
Заполните массив из N элементов случайными целыми числами в диапазоне 1…N так, чтобы в массив...

Сформировать массив из 27 элементов и заполнить его случайными целыми числами в диапазоне [-45.45]
Ребят помогите пожалуйста в basic ) 1.Сформулировать массив K состоящий из 27 элементов и...

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

Дан массив размерности n. Заполнить массив случайными числами в диапазоне [-100;100]. Перевернуть массив:
Дан массив размерности n. Заполнить массив случайными числами в диапазоне . Перевернуть массив:...


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

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

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