Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 5.00/8: Рейтинг темы: голосов - 8, средняя оценка - 5.00
1 / 1 / 1
Регистрация: 22.12.2012
Сообщений: 16

Разработать процедуру, которая формирует вектор из заданного количества целых случайных чисел

15.01.2013, 15:55. Показов 1778. Ответов 2
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Разработать процедуру, которая формирует вектор из заданного количества целых случайных чисел, попадающих в указанный диапазон. Среди элементов сформированного вектора заданного размера, все элементы которого различны. Элементы вектора вывести на экран и записать в типизированный файл randnumb.dat.
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
15.01.2013, 15:55
Ответы с готовыми решениями:

Составить программу, которая формирует файл целых чисел, получаемых с помощью датчика случайных чисел
Блин, братва!!!!=) Последняя работа в этом году, а сдать нужно до субботы, помогите пожалуйста!!!! Задание 1. Составить...

Составить программу, которая формирует массив из 7 случайных целых чисел, принадлежащих промежутку [-14;9], и вычисляет произведение нечетных чисел.
Составить программу, которая формирует массив из 7 случайных целых чисел, принадлежащих промежутку , и вычисляет произведение нечетных...

Составьте программу,которая формирует массив из 16 случайных целых чисел от -20 до 20 и находит элементы с нулевыми значениями
Составьте программу,которая формирует массив из 16 случайных целых чисел от -20 до 20 и находит элементы с нулевыми значениями

2
1 / 1 / 1
Регистрация: 22.12.2012
Сообщений: 16
18.01.2013, 20:58  [ТС]
помогите плиз))
0
1 / 1 / 1
Регистрация: 22.12.2012
Сообщений: 16
04.02.2013, 13:25  [ТС]
Лучший ответ Сообщение было отмечено Cybernik как решение

Решение

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
30
31
32
33
program LR_11;
uses crt;
const n=100;
type  arr = array [1..n] of integer;
var vuhid:file of integer; a:arr;
procedure rondom (k:integer; x:arr; dia:integer; dia1:integer );
 
var
i,j,tmp:integer;
begin
   for i := 1 to k do
     a[i] := i;
     Randomize ;
   for i:= 1 to k do
     begin
        a[i]:=random(dia1-dia+1)+dia;
        j := random(n - i + 1) + i;
        tmp := a[j];
        a[j] := a[i];
        a[i] := tmp;
        textcolor(2);
        write (tmp);
        write (' ');
    end;
end;
  begin
     textcolor(1);
     writeln('Формування вектора кількості цілих випадкових чисел');
     assign(vuhid,'C:\Yur\randnumb.dat');
     rewrite(vuhid);
     close(vuhid);
     rondom(100, a, -10, 100);
  end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
04.02.2013, 13:25
Помогаю со студенческими работами здесь

Сформировать массив из заданного количества случайных целых чисел в заданном диапазоне
Доброго времени суток ув. форумчане. Не могу въехать как написать эту задачу: Задана последовательность значений элементов некоторого...

Разработать процедуру, которая в последовательности целых чисел подсчитывает количество чисел являющихся числом Мерсе
Нужно использовать 2 функции для нахождения чисел Мерсе в последовательности n. (Одна определяет, является ли число степенью двойки, вторая...

Написать программу, которая создает файл целых чисел, а затем формирует список целых чисел файла
Написать программу, которая создает файл целых чисел, а затем формирует список целых чисел файла. Создать список чисел, являющихся суммой...

Напишите программу, которая из элементов заданного вектора X формирует вектор Y
Тема: Обработка структурированных данных. Работа с одномерными массивами. Напишите программу, которая из элементов заданного вектора X...

Разработать процедуру, которая в массиве целых чисел находит элементы с максимальным количеством четных цифр и его номер
Разработать процедуру, которая в массиве целых чисел находит элементы с максимальным количеством четных цифр и его номер. помогите плз....


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

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Новые блоги и статьи
Воспроизведение звукового файла с помощью SDL3_mixer при касании экрана Android
8Observer8 26.01.2026
Содержание блога SDL3_mixer - это библиотека я для воспроизведения аудио. В отличие от инструкции по добавлению текста код по проигрыванию звука уже содержится в шаблоне примера. Нужно только. . .
Установка Android SDK, NDK, JDK, CMake и т.д.
8Observer8 25.01.2026
Содержание блога Перейдите по ссылке: https:/ / developer. android. com/ studio и в самом низу страницы кликните по архиву "commandlinetools-win-xxxxxx_latest. zip" Извлеките архив и вы увидите. . .
Вывод текста со шрифтом TTF на Android с помощью библиотеки SDL3_ttf
8Observer8 25.01.2026
Содержание блога Если у вас не установлены Android SDK, NDK, JDK, и т. д. то сделайте это по следующей инструкции: Установка Android SDK, NDK, JDK, CMake и т. д. Сборка примера Скачайте. . .
Использование SDL3-callbacks вместо функции main() на Android, Desktop и WebAssembly
8Observer8 24.01.2026
Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
моя боль
iceja 24.01.2026
Выложила интерполяцию кубическими сплайнами www. iceja. net REST сервисы временно не работают, только через Web. Написала за 56 рабочих часов этот сайт с нуля. При помощи perplexity. ai PRO , при. . .
Модель сукцессии микоризы
anaschu 24.01.2026
Решили писать научную статью с неким РОманом
http://iceja.net/ математические сервисы
iceja 20.01.2026
Обновила свой сайт http:/ / iceja. net/ , приделала Fast Fourier Transform экстраполяцию сигналов. Однако предсказывает далеко не каждый сигнал (см ограничения http:/ / iceja. net/ fourier/ docs ). Также. . .
http://iceja.net/ сервер решения полиномов
iceja 18.01.2026
Выкатила http:/ / iceja. net/ сервер решения полиномов (находит действительные корни полиномов методом Штурма). На сайте документация по API, но скажу прямо VPS слабенький и 200 000 полиномов. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru