1) Сначала А = 1 В = 2. А становится = 3, потом B = 6, т.к. у нас А уже = 3 => ответ
А = 3 В = 6
2)Сначала А =1 В = 2 С = А, тоисть С = 1, А становится равно В тоисть = 2, В = 1.
Ответ А = 2 В = 1 С = 1
3)Сначала А = 1 В = 2, А становится равно 3(т.к. А + В), В становится равно 1(т.к. А - В, где 3 -2), потом А становится равно 2( т.к. А - В, где 3 - 1)
Я так понимаю намера билетов надо вывести в случайном порядке?
Пусть надо вывести в случайном порядке номера 100 билетов
program RND;
var a:array[1..100]of integer;
i.j,f:integer;
begin
randomize;
i:=1;
white i<101 do begin
f:=0;
A[i]:=int(random(100));
for j:=1 to i do if A[j]=A[i] then f:=1;
if f=0 then i:=i+1;
end;
for i:=1 to 100 do writeln(A[i]);
end.
Свєта говорит правду
Аня неправду
Оля через раз но севодня не правду