Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Потрепаться";
Текущий архив: 2003.03.17;
Скачать: [xml.tar.bz2];

Вниз

На каком языке это написано?   Найти похожие ветки 

 
AK-74   (2003-02-25 01:28) [0]

i=k
do while i>0
if ind[i+1]-ind[i]>1
ind[i]++
end if
do while ind[i+1]-ind[i]>1
ind[i+1]=ind[i]+1
i++
end do
do while ind[i]<=L+i-k
mul = 1
for j=1 to k
mul *= m[ind[j]]
next
sum+=mul
ind[i]++
end do
ind[i]--
i--
end do


 
Мазут Береговой   (2003-02-25 01:47) [1]

Похоже на Fortran, хотя и не уверен. Я его последний раз в институте видел в 1993 г.


 
AK-74   (2003-02-25 01:59) [2]

Нет, в Фортране, например, цикл for:
DO 1 J=1,K
и IF там по-другому, и метки должны быть, и много еще чего...


 
Мазут Береговой   (2003-02-25 02:41) [3]

Может Бэйсик? Только скобки квадратные смущают. Точно! End If, End Do в бэйсике. Может самый первый бэйсик?


 
PVOzerski   (2003-02-25 03:07) [4]

Это вряд ли бэйсик, там ++, *= и т.п. не бывает. IMHO, это запросто может быть макроязык из какой-нибудь проги. Хотя и какой-то менее известный универсальный - тоже. А вот квадратные скобки как синоним круглых некоторые диалекты бэйсика допускают.


 
Darts   (2003-02-25 09:32) [5]

Clipper


 
Delirium^.Tremens   (2003-02-25 09:40) [6]

Вьетнамский


 
alxx   (2003-02-25 10:39) [7]

- Папа, а что такое диструбные гентроны?
- Где ты это вычитал?
- Это я сам напиал.


 
DiamondShark   (2003-02-25 11:41) [8]

Похоже на Power Builder,
а может и какой ещё скриптовой язык.

Не томи душу, колись.


 
CinCinNut   (2003-02-25 12:47) [9]


> Darts (25.02.03 09:32)

Точно Клиппер. только там enddo, endif слитно пишутся.


 
Uncle Archi   (2003-02-27 21:43) [10]

Псевдокод.


 
AK-74   (2003-02-27 22:28) [11]

> Uncle Archi © (27.02.03 21:43)

Псевдокод?!?! %)
Приведенный кусок - это настоящий формальный компилируемый язык.


 
wal   (2003-02-28 01:20) [12]

PL/m


 
AK-74   (2003-02-28 01:39) [13]

> wal © (28.02.03 01:20)

Какой PL/M ?!
Там ведь массивы с круглыми скобками, всякие точки-с-запятой, и т.д.


 
Dudao++   (2003-02-28 03:44) [14]

мужики так это моё
Где этот кусок кода вы вытащили ?


 
Skyle   (2003-02-28 04:46) [15]

Дык колитесь уже, какой язык..:)) Уже интересно стало..:)


 
AK-74   (2003-02-28 13:15) [16]

> Dudao++ (28.02.03 03:44)
Тогда чё не написал, на каком это языке и чё это делает?


 
Mike B.   (2003-02-28 14:01) [17]

Это русский язык как государственный


 
Странник   (2003-02-28 15:08) [18]

> CinCinNut © (25.02.03 12:47)
это Clipper, а end-ы как хошь так и пиши


 
Leshiy   (2003-02-28 15:53) [19]

Ся


 
Паша   (2003-02-28 16:21) [20]

Clipper, только смысл написанного от меня ускользает:) похоже на расчет "диструбных гентронов"?



Страницы: 1 вся ветка

Форум: "Потрепаться";
Текущий архив: 2003.03.17;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.47 MB
Время: 0.009 c
4-54373
Shuric
2002-11-26 22:46
2003.03.17
Совмещение DOS и Widows


4-54384
Cosmic
2003-01-21 21:11
2003.03.17
Region Functions


4-54371
Артём К.
2002-12-24 05:05
2003.03.17
Версия Windows


1-54096
BillyJeans
2003-03-05 16:51
2003.03.17
KeyPress для TCustomDBGrid...


7-54347
MAPIIIAJL
2003-01-23 00:16
2003.03.17
Подскажите, как работать с двоичными файлами?





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский