|
|
ru.algorithms- RU.ALGORITHMS ---------------------------------------------------------------- From : Comoderator Of Ru Algorithms 2:5002/46.4 12 Dec 2001 12:00:14 To : Andrey Maximenko Subject : [*] Re^2: Гоpодская олимпиада по инфоpматике -------------------------------------------------------------------------------- 11 Дек 01 09:18, you wrote to Kartohin Ruslan: [*] offtopic Hеудачную тему ты задал для обсуждения. 2All: Прекращайте это обсуждение, какие языки лучше, всех участников перестреляю. А по части клипера - ну дык базы данных на нём пишут, в своё время был популярен, ну а сейчас на сколько мне известно на вершине SQL, причём проявляется во многих языках. Hе та эта тема - "что лучше?". >> "Студенты начавшее обучение с языка Бейсик, пpактически >> оболванены и AM> не >> способны к дальнейшему обучению." (как-то пpимеpно так) (с) >> Дейкстpа. AM> Господа! AM> Вот вам простенький пример на Clipper'е: AM> if (a<1) AM> c:=1 AM> d:=2 AM> elseif (a<10) AM> c:=20 AM> d:=30 AM> Else AM> c:=-13 AM> d:=41 AM> EndI AM> Hапишите его на Паскале, и убедите меня, что его легче прочитать. AM> И покажите мне примерчик создания/вызова функции AM> с переменным количеством параметров разного типа (типа WriteLn). AM> И объясните, почему AM> Str(i: 8: 2, s); AM> WriteLn(s); AM> выглядит лучше, чем QOut(Str(i,8,2)) AM> ----------------------------------------------------------------- AM> А вот вам пример того самого задания на Clipper'е: AM> dbCreate('a1', {{'Word','C', 255, 0}}) AM> dbCreate('a2', {{'Word','C', 255, 0}}) AM> use a1 new AM> index on word to a1 uniq AM> append from input1.txt sdf AM> use a2 new AM> index on word to a2 uniq AM> append from input1.txt sdf AM> set rela to a2->word into a1 AM> copy fields word to output.txt for a2->word=a1->word delimited with AM> blank Вот вам и сортировка, и отбор, и все в нескольких строчках AM> И кто приведет мне пример популярного программного продукта, AM> разраюотанного на Паскале (или делфи) AM> Андрей Максименко AM> PS. Hа Clipper'е, между прочим, были написаны первая и вторая версии AM> 1С. Comoderator ... . Трудно мне жить слугой, а хозяином мне не быть. (q) Ария --- GoldED+/386 1.1.4.7 * Origin: Всёфигня кроме пчёл,хотя пчёлы,еслиподумать,тоже фигня (2:5002/46.4) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.algorithms/143013c173a05.html, оценка из 5, голосов 10
|