доработайте программу русское лото так чтобы все 5 значений гарантированно были бы разными
В игре русское лото из мешка случайным образом выбираются бочонки, на каждом из которых написано число от 1 до 90.Напишите программу, которая выводит наугад первые 5 выигрышных номеров. Доработайте программу так, чтобы все 5 значений были гарантированно разными
Выполнять в паскале a b c ОЧЕНЬ НАДО.
const
n = 5;
i, j, k: integer;
a: array[1..n] of integer;
p: boolean;
begin
randomize;
for i := 1 to n do
repeat
k := random(90) + 1;
j := 1;
p := True;
while p and (j 0 0
Задачу можно решить с помощью простой программы:
var n1,n2,i,j:integer;
begin
n1:=67;n2:=54;
for i:=1 to 100 do
for j:=1 to 100 do
if n1*i-n2*j = 10 then writeln(i,’ ‘,j);
end.
В ответе получим 34 и 42.
67*34-54*42=2278-2268=10
Если вместо 100 задать другие значения, то получим и другие решения задачи.