В игре Русское лото» из мешка случайным образом выбираются - вопрос №21098899 от Анна02000 29.12.2021 21:26

Question

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

Анна02000 · Answer

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....