:: Игры Разума
Вопросы на собеседовании 7
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Очень простой вопрос, для новичков скорее, потому что практически все знают ответ, только я не разу не видел такого применения в чужих исходниках.

Дано:
есть, к примеру, три процедуры
Proc1
Proc2
Proc3

НаписАть одну строчку кода в которой выполняются все указанные процедуры


------------------
Часто бывает так, что есть над чем задуматься, а нечем.




Исправлено 1 раз(а). Последнее : piva, 12.03.07 06:49
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
s28091973

Сообщений: 287
Дата регистрации: 05.04.2001
Это процедуры или функции??
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
Foxtrot

Сообщений: 3408
Откуда: Куда:
Дата регистрации: 25.04.2003
Ну что тут скажешь?
Иссяк ты, парень


------------------
Мойте ноги, моя ноги вы моете и руки
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Ну не всегда же фонтанировать


------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
AleksM

Сообщений: 17881
Дата регистрации: 11.11.2003
?Proc1(),Proc2(),Proc3()
PROCEDURE Proc1
RETURN "1"
PROCEDURE Proc2
RETURN "2"
PROCEDURE Proc3
RETURN "3"


------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Дык я вот тут давеча узнал что некоторые (не буду показывать пальцем) не знают до сих пор как массивы инициализировать одной строкой, все через циклы делают

ЗЫ - кстати - а куда вывод пойдет - в текущее окно ?


------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
AleksM

Сообщений: 17881
Дата регистрации: 11.11.2003
Цитата:
ЗЫ - кстати - а куда вывод пойдет - в текущее окно ?
Это уже второй вопрос


------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
PaulWist

Сообщений: 14601
Дата регистрации: 01.04.2004
piva
Дык я вот тут давеча узнал что некоторые (не буду показывать пальцем) не знают до сих пор как массивы инициализировать одной строкой, все через циклы делают

Кстати, я тоже не знаю как одной строкой заполнить массив из 1000 эл-тов от 1 до 1000


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Ну вопросик то убери


------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Help Store - "="


------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
PaulWist

Сообщений: 14601
Дата регистрации: 01.04.2004
piva
Help Store - "="

Ну ты условие задачи прочитал?

LOCAL arr(100)

STORE 1 TO arr

? arr(100)

FOR i = 1 TO 100
arr(i) = i
ENDFOR
?arr(100)

Вот изобрази заполнение массива одной строкой


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Виноват - в данном случае - никак


------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
Владимир Максимов

Сообщений: 14095
Откуда: Москва
Дата регистрации: 02.09.2000
PaulWist
Кстати, я тоже не знаю как одной строкой заполнить массив из 1000 эл-тов от 1 до 1000

Если это символьные строки, а не числа, то можно так:

ALEN(MyArray,"1,2,3,4,5,6,...",",")

Хотя писать такую строку... Лучше уж циклом

Для чисел тоже можно, но уже менее корректно. Больше смахивает на "фокус"

SELECT Recno() FROM MyTable WHERE Recno()<=1000 INTO ARRAY MyArray

Разумеется, если таблица MyTable имеет не менее 1000 записей.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
PaulWist

Сообщений: 14601
Дата регистрации: 01.04.2004
Владимир Максимов
Если это символьные строки, а не числа, то можно так:

ALEN(MyArray,"1,2,3,4,5,6,...",",")


Володь, и что у тебя говорит Фокс по поводу такой ф-ии


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
Владимир Максимов

Сообщений: 14095
Откуда: Москва
Дата регистрации: 02.09.2000
PaulWist
Владимир Максимов
Если это символьные строки, а не числа, то можно так:

ALEN(MyArray,"1,2,3,4,5,6,...",",")


Володь, и что у тебя говорит Фокс по поводу такой ф-ии

Говорит "опечатка" Неправильно, говорит, буквы пишешь. ALINES(), говорит, надо писать...
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Кстати о птичках
timer=Seconds()
For i=1 to 1000000
=1,2,3,4,5,6,7,8,9,0
Next
? Seconds()-timer


------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
PaulWist

Сообщений: 14601
Дата регистрации: 01.04.2004
Так прикольнее
LOCAL a, b, c
timer=Seconds()
For i=1 to 1000000
= a, b, c
Next
? Seconds()-timer


------------------
Есть многое на свете, друг Горацио...
Что и не снилось нашим мудрецам.
(В.Шекспир Гамлет)
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
AleksM

Сообщений: 17881
Дата регистрации: 11.11.2003
А чё эта вы тут делаете, а?


------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
piva
Автор

Сообщений: 18655
Откуда: Курган
Дата регистрации: 24.03.2004
Заметь, что если переменных добавить - то цикл идет дольше


------------------
Часто бывает так, что есть над чем задуматься, а нечем.
Ratings: 0 negative/0 positive
Re: Вопросы на собеседовании 7
AleksM

Сообщений: 17881
Дата регистрации: 11.11.2003
Итого собеседования:
LOCAL a, b, c
timer=Seconds()
For i=1 to 1000000
= x, y, z
Next
? Seconds()-timer


------------------
Лучше переесть, чем недоспать.
Не спеши, а то успеешь.
Ratings: 0 negative/0 positive


Извините, только зарегистрированные пользователи могут оставлять сообщения в этом форуме.

On-line: 3 (Гостей: 3)

© 2000-2024 Fox Club 
Яндекс.Метрика