- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
- 12
- 13
- 14
- 15
- 16
- 17
- 18
- 19
- 20
- 21
- 22
- 23
- 24
- 25
- 26
- 27
- 28
- 29
- 30
- 31
- 32
- 33
- 34
- 35
- 36
- 37
- 38
- 39
- 40
- 41
- 42
- 43
- 44
- 45
- 46
- 47
- 48
- 49
- 50
- 51
- 52
- 53
- 54
- 55
- 56
- 57
- 58
- 59
- 60
- 61
- 62
- 63
- 64
- 65
- 66
- 67
- 68
- 69
- 70
- 71
- 72
- 73
- 74
- 75
- 76
- 77
- 78
- 79
- 80
- 81
- 82
- 83
- 84
- 85
- 86
- 87
- 88
- 89
- 90
- 91
- 92
- 93
- 94
- 95
uses crt;
begin
gotoxy (34,12);
write ('*'); {Центр}
{шагаем линию от центра в лево на 6 позиций, меняется только ось Х в - 6}
gotoxy (33,12);
write ('*');
gotoxy (32,12);
write ('*');
gotoxy (31,12);
write ('*');
gotoxy (30,12);
write ('*');
gotoxy (29,12);
write ('*');
gotoxy (28,12);
write ('*');
{шагаем линию от центра в право на 6 позиций, меняется только ось Х в + 6}
gotoxy (35,12);
write ('*');
gotoxy (36,12);
write ('*');
gotoxy (37,12);
write ('*');
gotoxy (38,12);
write ('*');
gotoxy (39,12);
write ('*');
gotoxy (40,12);
write ('*');
{шагаем верх линию от центра на 6 позиций, меняется только ось У на - 6}
gotoxy (34,11);
write ('*');
gotoxy (34,10);
write ('*');
gotoxy (34,9);
write ('*');
gotoxy (34,8);
write ('*');
gotoxy (34,7);
write ('*');
gotoxy (34,6);
write ('*');
{шагаем диагональ лево верхнее крыло на 6 позиций меняются все оси}
gotoxy (29,11);
write ('*');
gotoxy (30,10);
write ('*');
gotoxy (31,9);
write ('*');
gotoxy (32,8);
write ('*');
gotoxy (33,7);
write ('*');
gotoxy (34,6);
write ('*');
{шагаем диагональ право верхнее крыло на 6 позиций меняются все оси}
gotoxy (35,7);
write ('*');
gotoxy (36,8);
write ('*');
gotoxy (37,9);
write ('*');
gotoxy (38,10);
write ('*');
gotoxy (39,11);
write ('*');
gotoxy (40,12);
write ('*');
{шагаем вниз линию от центра на 6 позиций, меняется только ось У на + 6}
gotoxy (34,13);
write ('*');
gotoxy (34,14);
write ('*');
gotoxy (34,15);
write ('*');
gotoxy (34,16);
write ('*');
gotoxy (34,17);
write ('*');
gotoxy (34,18);
write ('*');
{шагаем диагональ право нижнее крыло на 6 позиций меняются все оси}
gotoxy (35,17);
write ('*');
gotoxy (36,16);
inkanus-gray 23.04.2016 20:48 # +5
guest 23.04.2016 21:21 # +2
gost 23.04.2016 22:00 # +3
kegdan 23.04.2016 23:30 # +2
bormand 23.04.2016 23:41 # 0
kegdan 23.04.2016 23:42 # 0
bormand 23.04.2016 23:47 # 0
Гомосексуализм - не болезнь. Зачем его лечить?
kegdan 23.04.2016 23:49 # +1
3.14159265 10.05.2016 22:50 # +1
>Гомосексуализм - не болезнь.
Так потому и не вылечат.
gost 24.04.2016 11:25 # 0
bormand 23.04.2016 21:53 # +5
3_14dar 10.05.2016 23:00 # +2
guesto 10.05.2016 23:04 # +5
3_dar 10.05.2016 23:57 # +3
inkanus-gray 10.05.2016 23:59 # +3
3_14dar 24.04.2016 04:23 # 0
guest 26.04.2016 00:43 # 0
Vasiliy 10.05.2016 17:59 # 0
не ?
bormand 10.05.2016 20:27 # 0
guest 10.05.2016 21:35 # 0
guest 10.05.2016 21:35 # +2
что тут смешного?