uses Crt; const n=10; type Mas=array [1..n] of integer; var A: Mas; i, temp, MinInd, MaxInd, Max, Min: integer; begin ClrScr; Randomize; for i:=1 to n do begin A[i]:=10+random(90); Write (A[i]:5); end; WriteLn; Max:=A[1]; MaxInd:=1; Min:=A[1]; MinInd:=1; for i:=2 to n do begin if A[i]<Min then begin Min:=A[i]; MinInd:=i; end else if A[i]>Max then begin Max:=A[i]; MaxInd:=i; end; end; temp:=A[MaxInd]; A[MaxInd]:=A[MinInd]; A[MinInd]:=temp; WriteLn;WriteLn; for i:=1 to n do Write (A[i]:5); WriteLn; ReadLn; end.
uses Crt; const n=10; type Mas=array [1..n] of integer; var A: Mas; i, temp, MinInd, MaxInd, Max, Min: integer; begin ClrScr; Randomize; for i:=1 to n do begin A[i]:=10+random(90); Write (A[i]:5); end; WriteLn; Max:=A[1]; MaxInd:=1; Min:=A[1]; MinInd:=1; for i:=2 to n do begin if A[i]<Min then begin Min:=A[i]; MinInd:=i; end else if A[i]>Max then begin Max:=A[i]; MaxInd:=i; end; end; temp:=A[MaxInd]; A[MaxInd]:=A[MinInd]; A[MinInd]:=temp; WriteLn;WriteLn; for i:=1 to n do Write (A[i]:5); WriteLn; ReadLn; end.
A+B=3k k=1,2,3... кратность к 3
A=3B условие 2-ое
получаем 3B+B=3k
4B=3k отсюда вывод вторая цифра кратная к 3,
то есть 3,6,9
При B=6 и B=9 => цифра A получится двухзначним
значит B=3, A=9
ответ 93
int x=0;
for(int i=1;i<10;i++)
for(int j=1;j<10;j++)
if(i%3==0 && i==3*j)
{x=i*10+j;
cout<<x<<endl;
}
можно оптимизировать
for(int i=1;i<4;i=i++)
if(i%3==0)
{x=i*31;
cout<<x<<endl;
}
1й перебирает 99 вариантов
2й 3 варианта
Или просто можно сделать
cout<<"93"<<endl;
)))