powered by simpleCommunicator - 2.0.53     © 2025 Programmizd 02
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / !!!
14 сообщений из 14, страница 1 из 1
!!!
    #37035062
NewFox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Как можно организовать такую выборку Table1 to Table2

Код: plaintext
1.
Table1

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
A1
1
2
3
4
6
7
8
9
11
12
13
14
16

Код: plaintext
1.
Table2
Код: plaintext
1.
2.
3.
4.
N1	N2	N2
1	4	5
6	9	10
11	14	15
...
Рейтинг: 0 / 0
!!!
    #37035065
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Тут телепатов нет, описывай алгоритм преобразования.
...
Рейтинг: 0 / 0
!!!
    #37035066
NewFox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
...
Рейтинг: 0 / 0
!!!
    #37035067
tanglir
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
NewFox[img = http://C:\02.jpeg ]Это что за бред??
...
Рейтинг: 0 / 0
!!!
    #37035071
newFox
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
А как можно закрепить img?
...
Рейтинг: 0 / 0
!!!
    #37035078
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
newFoxА как можно закрепить img?
Просто добавь файл к сообщению.
...
Рейтинг: 0 / 0
!!!
    #37035079
Саша_6666
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
...
Рейтинг: 0 / 0
!!!
    #37035085
Dima T
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Запаковывать JPG не обязательно (они почти не жмутся архиваторами), только на твоей картинке нарисовано то же что и в первом посте написано.

PS Подозреваю что это лаба по программированию. Если так, то так и пиши, перепечатай текст задания и в форум работа, там за умеренную денежку тебе помогут.
...
Рейтинг: 0 / 0
!!!
    #37035387
BMJ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BMJ
Гость
Как 1-ая строка формируется не понял. Следующие явно 1строка+5
...
Рейтинг: 0 / 0
!!!
    #37035432
NewFoxКак можно организовать такую выборку Table1 to Table2

Код: plaintext
1.
Table1

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
A1
1
2
3
4
6
7
8
9
11
12
13
14
16

Код: plaintext
1.
Table2
Код: plaintext
1.
2.
3.
4.
N1	N2	N2
1	4	5
6	9	10
11	14	15


Мда, куда катится мир...
...
Рейтинг: 0 / 0
!!!
    #37036157
Саша_6666
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Задача такая есть таблица один из полей например А1 цифры начиная от 1 до 20 на этом дистанции нето 5, 10, 15 мне надо заполнит другую таблицу вот так : 1-2-3-4 (5 там нету) ; 6-7-8-9 (10 там нету) ; 11-12-13-14 (15 там нету) .
...
Рейтинг: 0 / 0
!!!
    #37037614
BMJ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
BMJ
Гость
Цифры это 1-9, дальше числа.
...
Рейтинг: 0 / 0
!!!
    #37041917
Kruchinin Pahan
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Саша_6666,

Telepat mode hat on.

Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
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.
CREATE CURSOR CurIn (Kod I)
INSERT INTO CurIn VALUES ( 1 )
INSERT INTO CurIn VALUES ( 2 )
INSERT INTO CurIn VALUES ( 3 )
INSERT INTO CurIn VALUES ( 4 )
INSERT INTO CurIn VALUES ( 6 )
INSERT INTO CurIn VALUES ( 7 )
INSERT INTO CurIn VALUES ( 8 )
INSERT INTO CurIn VALUES ( 9 )
INSERT INTO CurIn VALUES ( 11 )
INSERT INTO CurIn VALUES ( 12 )
INSERT INTO CurIn VALUES ( 13 )
INSERT INTO CurIn VALUES ( 14 )
INSERT INTO CurIn VALUES ( 16 )

CREATE CURSOR CurOut (Start I, End I, NoHere I)

SELECT CurIn
GO TOP
lnKey		=  0 
lnMinKey	= Kod
DO WHILE .T.
	lnKey = lnKey +  1 
	IF lnKey < Kod && OR EOF()
		INSERT INTO CurOut VALUES (lnMinKey, lnKey -  1 , lnKey)
		lnKey		= Kod
		lnMinKey	= Kod
	ENDIF

	IF EOF()
		EXIT
	ENDIF
	SKIP  1  IN CurIn
ENDDO


Telepat mode hat off.
...
Рейтинг: 0 / 0
!!!
    #37042812
Фотография Павел Воронцов
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Саша_6666,

Не знаю как в FoxPro, но на SQL это решается примерно так:
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
create table ddd (num number( 3 ) not null primary key);

select n1, n2, n2+ 1  as n3 from (
select n1, min(n2) over (order by nvl(n1,n2) rows between current row and  1  following) as n2 from (
select d1.num as n1, d2.num as n2
from ddd d1 full outer join ddd d2 on d1.num=d2.num+ 1 
where d1.num is null or d2.num is null) a) b
where n1 is not null;
Можно и без аналитических функций.
...
Рейтинг: 0 / 0
14 сообщений из 14, страница 1 из 1
Форумы / FoxPro, Visual FoxPro [игнор отключен] [закрыт для гостей] / !!!
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]