1)С подмогою датчика случайных чисел получить к-вещественных чисел n (0amp;lt;Namp;lt;1) Значения

1)С поддержкою датчика случайных чисел получить к-вещественных чисел n (0lt;Nlt;1) Значения k вводиться с клавиатуры

2)С поддержкою датчика случайных чисел получить k-целых чисел лежащих в спектре от 0 до А включительно k и А вводится с клавиатуры

Задать свой вопрос
1 ответ
1)
uses crt;
var i,k:integer;
n:real;
begin
randomize;
read(k);
for i:=1 to k do
begin
n:=random;
write(n:0:2,' ');
end;
end.
2)
uses crt;
var i,k,n,a:integer;
begin
randomize;
read(k,a);
for i:=1 to k do
begin
n:=random(0,a);
write(n,' ');
end;
end.
Саша Чагар
Всегда пожалуйста.
Вован
Я очень нередко здесь не появляюсь - раз в 1-2 денька. Но на телефон приходят извещения о сообщениях, так что постараюсь всегда делать ваши задания.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт