http://pavl.gip-gip.com/feed/? Последние темы Thu, 28 Aug 2008 21:02:33 GMT 10 http://illiweb.com/fa/prosilver/site_logo.gif http://pavl.gip-gip.com/feed/? http://pavl.gip-gip.com/forum-f1/tema-t2.htm uses crt;<br /><br />var a:array [1..100,1..100] of integer;<br /><br /> b:array [1..100] of integer;<br /><br />max,d,n,i,f,j,k,c:integer;<br /><br />begin<br /><br />clrscr;<br /><br />readln(n);<br /><br />randomize;<br /><br />for i:=1 to n do<br /><br />begin<br /><br />for j:= 1 to n do<br /><br />begin<br /><br />a[i,j]:=trunc(random(9)-5);<br /><br />write (a[i,j],' ');<br /><br />end;<br /><br />writeln;<br /><br />end;<br /><br />writeln;<br /><br /><br /><br />k:=1;<br /><br />for i:=1 to n do<br /><br />for j:=1 to n do<br /><br />begin<br /><br />b[k]:=a[i,j];<br /><br /><br /><br />write(b[k],' ');<br /><br />k:=k+1<br /><br />end;<br /><br />writeln;<br /><br />for f:=1 to k-1 do<br /><br />begin<br /><br />max:=b[f];<br /><br />for i:=f to k do<br /><br />if b[i]&gt;=max ... Admin Ваш первый форум Mon, 11 Feb 2008 15:13:42 GMT http://pavl.gip-gip.com/forum-f1/tema-t2.htm http://pavl.gip-gip.com/forum-f1/tema-t1.htm Прочтите эту информацию, прежде чем начать администрацию вашего форума:<br /><br />Как попасть в вашу Панель администратора? В верхнем меню щелкните на "Вход", откроется новая страница, впишите имя пользователя " admin " и пароль, который вы указали при регистрации. Если вы потеряли или забыли ваш пароль, щёлкните здесь. После подключения нажмите на кнопку "Панель администратора" внизу страницы.Как изменить внешний вид вашего форума? Вы можете изменить дизайн вашего форума, выбрав стиль оформления (каждый ... Admin Ваш первый форум Tue, 05 Feb 2008 13:21:01 GMT http://pavl.gip-gip.com/forum-f1/tema-t1.htm