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

Question

Информатика

Берта

30 марта, 21:49

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

+1

Ответы (1)

Знаете ответ?

Ларуня · Answer 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.