Напишите программу, которая вводит натуральное число N и выводит на экран N псевдослучайных чисел. Запустите её несколько раз, объясните результаты опыта.

Question

Информатика

Василида

30 декабря, 18:41

Напишите программу, которая вводит натуральное число N и выводит на экран N псевдослучайных чисел. Запустите её несколько раз, объясните результаты опыта.

+2

Ответы (1)

Знаете ответ на вопрос?

Василия · Answer 1

Var n, i: integer;

begin

//включаем рандом

randomize;

//Вводим N

readln (n) ;

//генерируем N случайных чисел до 100.

for i:=1 to n do

begin

n:=random (100) ;

//Выводим эти числа

write (n, ' ') ;

end;

writeln;

end.