1)С помощью датчика случайных чисел получить к-вещественных чисел n (0<N<1) Значения k вводиться с клавиатуры
2)С помощью датчика случайных чисел получить k-целых чисел лежащих в диапазоне от 0 до А включительно k и А вводится с клавиатуры
Ответы на вопрос
Ответил nikolac
0
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.
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.
Ответил Аноним
0
благодарю
Ответил nikolac
0
Всегда пожалуйста.
Ответил Аноним
0
=)
Ответил Аноним
0
теперь только к вам буду обращаться)
Ответил nikolac
0
Я сильно часто тут не появляюсь - раз в 1-2 дня. Но на телефон приходят уведомления о сообщениях, так что постараюсь всегда делать ваши задания.
Новые вопросы