- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
....
for i:=1 to 4 do for j:=1 to 4 do begin a[i,j]:=b; b:=b-1; end;
for i:=1 to 4 do for j:=1 to 4 do if a[i,j]=16 then begin k:=i;l:=j; end;
for i:=1 to 4 do
for j:=1 to 4 do
begin
gotoxy(5+3*i,5+2*j);
write(a[i,j]);
end;
....
Lure Of Chaos 02.02.2011 17:53 # +1
dew2 02.02.2011 20:03 # 0
пятнашки чтоли реализовывал?
bugmenot 02.02.2011 20:56 # 0
write('Apasati
апасрати
7ion 02.02.2011 20:57 # −2
bugmenot 02.02.2011 21:01 # 0
7ion 02.02.2011 21:22 # 0
StriderMan 10.02.2011 10:39 # +3
7ion 10.02.2011 14:39 # +4
StriderMan 11.02.2011 12:36 # +2
7ion 11.02.2011 20:20 # +1
Lure Of Chaos 04.04.2011 23:04 # 0
dew2 02.02.2011 21:50 # 0
TarasB 02.02.2011 22:07 # +2
Я тоже могу, но говно там унылое в основном.
ctm 04.02.2011 21:39 # +1
Lure Of Chaos 05.02.2011 17:28 # 0
bugmenot 05.02.2011 21:53 # 0
Lure Of Chaos 05.02.2011 22:09 # −2
2,5 человека
guest 04.04.2011 22:45 # +2
absolut 04.04.2011 23:02 # +1
Lure Of Chaos 04.04.2011 23:04 # +1
а по гибким 5,25'' даже скучаю )
guest 05.02.2011 17:30 # −1