В игре <<Русское лото» из мешка случайным образом выбираются бочонки, на каждом из которых написано число от 1 до 90. Напишите 5 программу, которая выводит наугад первые 5 выигрышных номеров.
Доработайте программу <<Русское лото» так, чтобы все 5 значений гарантированно были бы разными (используйте разные диапазоны).(в паскале)

1) Дополненная

program Hello;

var

   a : array[1..90] of integer;

   i, x : integer;

begin

   randomize();

 for i:= 1 to 90 do

 begin

   a[i] := i;

 end;

 for i:= 1 to 5 do

 begin

   x := random(90) + 1;

   if a[x] <> 0 then

   begin

       writeln(a[x]);

       a[x] := 0;

   end;

 end;

end.

1. oc ( операционная система ) позволяет всем что происходит в компьютере.

2. windows , linux ( возможно ошибка в написании ) , mac os

3.относятся также диалоговые оболочки и сервисные программы.

сервисные программы – это программы обслуживания дисков (копирование, форматирование, «лечение» ),  сжатия файлов на дисках (архиваторы), борьбы с компьютерными вирусами и т.д. 

4. java,  turbo basic,  quick basic

5.системы программирования предназначены для программистов .

var a,b: string; begin                            cls;   read(a);     b: =a;           write('b')end.