Var
a:array[1..6]of integer;
i,j,max:integer;
function mx(a,b:integer):integer;
begin
if a>b then result:=a else result:=b;
end;
begin
for i:=1 to 6 do
begin
a[i]:=random(20);
write(a[i]:4);
end;
writeln;
max:=a[1];
for i:=1 to 6 do
for j:=i+1 to 6 do
if mx(a[i],a[j])>max then max:=mx(a[i],a[j]);
writeln('max=',max);
<span>end.</span>
#include<span><iostream> </span>
#include<span><cstdlib> </span>
<span>using namespace std; </span>
<span>int main() </span>
<span>{ </span>
<span>setlocale (0,""); </span>
<span>int k,m,b,i,j,A[5][5]; </span>
<span>for (j=0;j<5;j++) </span>
<span>//Ввод массива </span>
<span>{ </span>
<span>cout«"Введите элементы строки №"«j«" :"«endl; </span>
<span>for (i=0;i<5;i++) </span>
<span>{ </span>
<span>cout«"Введите элемент строки №"«i+1«":"; </span>
<span>cin»A[j][i]; </span>
<span>} </span>
<span>} </span>
<span>//Вывод массива </span>
<span>for(j=0;j<5;j++) </span>
<span>{ </span>
<span>for(i=0;i<5;i++) </span>
<span>{ </span>
<span>cout«A[j][i]«" "; </span>
<span>} </span>
<span>cout«endl; </span>
<span>} </span>
Кодування
закодоване слово
улюблений предмет- информатика!
Да зависит, если будет 5 фпс, то у тебя монитор будет просто тормозить, а если 30-60 (стабильная 60) или больше, то монитор будет не лагать
