Ответ:
можно больше объяснений пожалуйста
Буду делать по одному. Лови!
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;
<span>end.
</span>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;
<span>end.</span>
1) 4
2) 0
3) 9,7
4) 3,14
5) 0,45
6) 0,5
7) 6
8) 6
9) 7
10) 49