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

Вычислить сумму целых случайных чисел, распределенных в диапазоне от 5 до 10

19.06.2012, 20:38. Просмотров 4261. Ответов 1
Метки нет (Все метки)

Помагите пожалуйста решить задачку в Lazarus и если можно нарисовать все это в Form1. Вычислить сумму целых случайных чисел, распределительных в диапазоне от 5 до 10 , пока эта сумма не превышает некоторого числа К. Вывести на экран с генерированные числа,значение суммы иколичество чисел.
0
Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
19.06.2012, 20:38
Ответы с готовыми решениями:

Выдайте на экран 10 случайных равномерно распределенных чисел в диапазоне
Выдайте на экран 10 случайных равномерно распределенных чисел в диапазоне: 1) От 3 до 12, целые....

Сформировать массив целых случайных чисел в диапазоне от 0 до 10. Подсчитать сумму четных и нечетных
2)Сформировать массив целых случайных чисел в диапазоне от 0 до 10. Подсчитать сумму четных и...

Вычислить сумму N случайных чисел, заданных в диапазоне от -5 до 5 включительно
Задача: Вычислить сумму N случайных чисел, заданных в диапазоне от -5 до 5 включительно....

Генератор случайных чисел в диапазоне от 0 до 1 (не целых)
Здравствуйте! Помогите пожалуйста. Вроде весь форум просмотрела,но ответа не нашла. Мне нужно...

1
Мишка Косолапый :)
282 / 252 / 86
Регистрация: 15.02.2012
Сообщений: 1,509
19.06.2012, 22:10 2
Лучший ответ Сообщение было отмечено анжелочка как решение

Решение

Delphi
1
2
3
4
5
6
7
while sum<k do
begin
a:=random(6)+5;  //  сгенирируем
Label1.caption:=Label1.caption + ' ' + IntToStr(a);  // выведем через пробел
sum:=sum+a;  // суммируем новое число с всеми числами.
n:=n+1;  // нарастаем количество этих чисел
end;
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
19.06.2012, 22:10

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Сгенерировать 10 случайных целых чисел в диапазоне от N до M
Сгенерировать 10 случайных целых чисел в диапазоне от N до M var n,m,a,i:integer; begin...

С помощью датчика случайных чисел получить 30 целых чисел, лежащих в диапазоне от 0 до 5
Здраствуйте! С помощью датчика случайных чисел получить 30 целых чисел, лежащих в диапазоне от 0 до...

Сформировать матрицу 5*5 случайных целых чисел в диапазоне от -20 до 60
Сформировать матрицу 5*5 случайных целых чисел в диапазоне от -20 до 60. Напечатать матрицу. Найти...

Создать массив из 10 целых случайных чисел. Вычислить сумму четных элементов массива и среднее арифметическое нечетных
Создать массив из 10 целых случайных чисел. Вычислить сумму четных элементов массива и среднее...


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

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

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2020, vBulletin Solutions, Inc.