Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.03.17;
Скачать: CL | DM;

Вниз

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

 
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;
Скачать: CL | DM;

Наверх




Память: 0.5 MB
Время: 0.023 c
14-54280
NKkkk
2003-02-28 17:11
2003.03.17
8 марта посвящается


14-54189
Supreme 2
2003-03-02 13:39
2003.03.17
Чуть было не отхватил вчера на дискотеке


14-54277
uw
2003-02-28 15:18
2003.03.17
Что ответить дедушке


3-53851
Ihtiandr
2003-02-24 18:54
2003.03.17
uninstall BDE


8-54119
Konstantin
2002-11-30 17:55
2003.03.17
Опять про склеивание *.wav