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

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

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

Студворк — интернет-сервис помощи студентам
массив из 20 элементов заполняется случайными целыми числами в диапазоне от0 до 100 и выводит на экран в строку. Массив сортируется классическим способом. ПОМОГИТЕ ПРОШУ ПОЖАЛУЙСТА!!!
0
Лучшие ответы (1)
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
30.03.2010, 17:33
Ответы с готовыми решениями:

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

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

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

2
Студент
 Аватар для Жека-старший
498 / 344 / 162
Регистрация: 15.03.2010
Сообщений: 601
30.03.2010, 17:50
Лучший ответ Сообщение было отмечено динара 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
 Аватар для NIch
401 / 312 / 74
Регистрация: 17.03.2010
Сообщений: 1,119
30.03.2010, 17:54
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
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
30.03.2010, 17:54
Помогаю со студенческими работами здесь

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

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

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

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

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


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++
8Observer8 10.03.2026
Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:
Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE
8Observer8 10.03.2026
Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .
Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки
Neotwalker 08.03.2026
Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .
Модульная разработка через nuget packages
DevAlt 07.03.2026
Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .
Модульный подход на примере F#
DevAlt 06.03.2026
В блоге дяди Боба наткнулся на такое определение: В этой книге («Подход, основанный на вариантах использования») Ивар утверждает, что архитектура программного обеспечения — это структуры,. . .
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование
8Observer8 05.03.2026
Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .
SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D
8Observer8 04.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .
SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий
8Observer8 02.03.2026
Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru