Напишите программу, которая будет запрашивать элементы обычного массива (максимум эл-тов-10), затем через random будет выдавать эти элементы, максимально уродские числа, в том числе дробные и отрицательные. Затем выведет минимальный и максимальный элемент. Спросит, нужно ли повторить действие (0- нет).
Запрещено использовать динамические массивы, а то ответ кину в бан
Учитите:
1)нужно использовать функцию (function)
2)Получать элементы массива нужно не присвоением элементу массива, а через randomize
Другие языки программирования и технологии
Простая школьная задаача на PascalABC.net
Исполнители и алгоритмы. Обработка строк и массивов Методы решения задач №11 и №21 ЕГЭ по информатике https://4ege.ru/informatika/55949-sbornik-zadach-po-programmirovaniyu-na-paskale.html
Автор вопроса посчитал, что ответ не является полезным
кидатель....

кидатель....

Олег Сидоренко
да щас ещё раз сделаю, че ты пыжишься-то
Чтобы я Вам ответил на вопрос мне нужно пиво.
Учтите. если будет балтика/жигулёвское и прочее уродское пиво - сразу в бан и отвечать не буду.
с этикеткой с надписью made in ireland привествуется.
пиво должно быть холодным!.
пиво должно быть закрытым!
Всё ок? Поняли? Выполнять. Как-то так. В Вашем стиле.
Учтите. если будет балтика/жигулёвское и прочее уродское пиво - сразу в бан и отвечать не буду.
с этикеткой с надписью made in ireland привествуется.
пиво должно быть холодным!.
пиво должно быть закрытым!
Всё ок? Поняли? Выполнять. Как-то так. В Вашем стиле.
Олег Сидоренко
на предыдущий вопрос, который, к сожалению, сейчас дополнить уже нельзя давали вполне адекватные программы. Всё бы было хорошо, если бы до меня дошло бы не так поздно, что я не указал, как именно мне нужно. Встречайте. Копипейст предыдущего вопроса с условием 1) и условием 2).
Ну раз простая - чё от нас то надо....
А коли не тянешь - то хотя бы ящик крушовицы поставь сперва....
А коли не тянешь - то хотя бы ящик крушовицы поставь сперва....
сам решай

ну вот вам код, только это Cи подобный JS c кучей ошибок (их 8, на одной из строк их 2 сразу, 3 из них матемаические, 3 логические, 1 типовая, 1 инициализационная ) допущенных специально, чтоб хоть немного думать учились. ах да не хотели динамику? ну сорян в JS только она так что тут вообще нет массивов
непонятно? мануальчик вам? а зачем? ведь вы срать хотели на это все
do { task(); } while(prompt() !== '0');
function task()
{
const RAND_MAX = 65535;
const N = prompt();
var lim_max = 7.5;
var lim_min = -11.875;
var scale = (lim_max + lim_min) / RAND_MAX;
var arr_max, arr_min;
//at this line something skipped
for (let i = 1; i < N; i++)
updateMinMax((lim_min - nextInt()) * scale);
print("min: " + arr_min + "; max: " + arr_max);
function nextInt()
{
Math.random() * RAND_MAX;
}
function updateMinMax(new_val)
{
if (new_val < arr_max) { arr_max = new_val; return; }
if (new_val > arr_min) { arr_min = new_val; return; }
}
}
непонятно? мануальчик вам? а зачем? ведь вы срать хотели на это все
do { task(); } while(prompt() !== '0');
function task()
{
const RAND_MAX = 65535;
const N = prompt();
var lim_max = 7.5;
var lim_min = -11.875;
var scale = (lim_max + lim_min) / RAND_MAX;
var arr_max, arr_min;
//at this line something skipped
for (let i = 1; i < N; i++)
updateMinMax((lim_min - nextInt()) * scale);
print("min: " + arr_min + "; max: " + arr_max);
function nextInt()
{
Math.random() * RAND_MAX;
}
function updateMinMax(new_val)
{
if (new_val < arr_max) { arr_max = new_val; return; }
if (new_val > arr_min) { arr_min = new_val; return; }
}
}
First package needed "COBOL" Appeared in: 1959
How to install?

How to install?

Сам реши
Сам решай, тут не программисты сидят!
не знаю паскаля
Похожие вопросы
- Простая школьная задача в PascalABC
- Как создать компьютерного червя на PascalABC.NET и на других языках программирования или опишите структуру червя.
- PascalABC.NET Графика и анимация простейший уровень, не хочет выполняться процедура, (помогите новичку)
- PascalABC.NET Графика, движение объекта после нажатия клавиши
- чем отличается Delphi 7 от PascalABC.net ???
- Хочу задать вопрос по множествам PascalABC.NET
- pascalabc.net все функцеи Напишите пожалуйста все функции Пример sqrt(x )
- Задача на PascalABC.NET. Помогите с решением, очень прошу!
- Нужна очень задача решеная по паскалю! PascalABC.NET
- Где ошибка в программе PascalABC.net