Astronet Поиск по астрономическим сайтам English Russian
       
        Точная форма слов   О проекте   Сайты   Справка
Найдено документов: 45670 (122 сайтов) ---- Время поиска: 0.08сек.   

1 | 2 | 3 | 4 | 5 | 6 | 7 | След.

Показаны документы, содержащие фрагменты текста из документа
http://www.uafo.ru/sw90/pdf/rkgs.pdf.

1. Actor Prolog. Example "D:\MOROZOV\Z\DEMO\EXE\EXAMPLES\ADA_LOG.HTML"
... The begining of program -- Target function: a * b with TEXT_IO ; use TEXT_IO ; procedure EXAMPLE is package IO_INT is new INTEGER_IO ( INTEGER ) ; use IO_INT ; r,b,a: INTEGER ; begin put ( Enter unsigned number 'b', please ... unsigned number 'a', please: ) ; get ( a ) ; declare VAR0 , VAR1 : INTEGER ; begin VAR0 := a; VAR1 := b; declare VAR3 , VAR2 , VAR4 : INTEGER ; begin VAR3 := 0 ; VAR2 := VAR0 ; VAR4 := VAR1 ; while VAR2 /= 0 loop begin if ...
[ Сохраненная копия ]  Ссылки http://www.cplire.ru/Lab144/start/ada_log.html -- 9.8 Кб -- 24.09.2007
Похожие документы
Еще в разделе: (Показать все результаты (>207) - www.cplire.ru/ )

2. http://www.abitu.ru/en2002/closed/viewwork.html?work=138
... 7 Части программы. procedure newdelay(ms:longint); {пауза в микросекундах} var r: registers ; begin r.ah:=$86; r.cx :=ms*1000 div 65536; r.dx :=ms*1000 mod 65536; intr ($15,r) end ; procedure clearcon;assembler; {очистка буфера клавиатуры} asm cli sub ax,ax mov es,ax; mov al,es:[41ah] mov es:[41ch],al sti end ; procedure lptread; {чтение порта 37B} var a:byte; ...
[ Текст ]  Ссылки http://www.abitu.ru/en2002/closed/viewwork.html?work=138 -- 60.5 Кб -- 05.05.2006
Похожие документы

3. http://www.naic.edu/~tghosh/software/pcheck.pro
... tested on SUN and VAX; updated prolog ; ;- ;************************************************************************* pro pcheck, variable , position , dimension , type ; npar = n_params(0) if npar eq 0 then begin print,'PCHECK, VARIABLE , POSITION , DIMENSION , TYPE ' retall endif ; npar ; ; decode valid dimensions ; vdim = bytarr(3) idim = ...
[ Сохраненная копия ]  Ссылки http://www.naic.edu/~tghosh/software/pcheck.pro -- 5.1 Кб -- 24.01.2003
Похожие документы

4. http://www.ssau.ru/files/education/metod_1/zemlyanoy_prilozheniya_delphi.pdf
... Delphi procedure TForm1.Button1Click(Sender: TObject); 12. , var x,y,z:real; begin x:=strtofloat(Edit1.text); y:=strtofloat(Edit2.text); z:=sqrt(sqr(x)+sqr(y)); Edit3.text:=floattostr(z); end; 13. ... procedure TForm1.SelectionChange(Sender: TObject); begin SpeedButton1.Down:=fsBold in RichEdit1.SelAttributes.Style; SpeedButton2.Down:=fsItalic in RichEdit1.SelAttributes.Style; SpeedButton3.Down:=fsUnderline in RichEdit1.SelAttributes.Style; end; TForm1 ( private) OnSelectionChange RichEdit1 ( Events...
[ Текст ]  Ссылки http://www.ssau.ru/files/education/metod_1/zemlyanoy_prilozheniya_delphi.pdf -- 367.4 Кб -- 09.12.2014
Похожие документы
Еще в разделе: (Показать все результаты (>71) - www.ssau.ru/ )

5. Symbol Substitution in Command Procedures
Next: DO Loops Up: MIDAS Command Language Previous: Passing Parameters in . As mentioned before, the Monitor performs symbol substitutions on MIDAS command lines in the first pass by replacing symbol names in the command line with their current value. For character symbols just the string is put in; for symbols of other types the binary data are converted to ASCII using the formats specified in the SET/FORMAT command. ... Example 6, MIDAS procedure exa6.prg . ... WRITE/KEYWORD VAR/R/1/1 0. ! ...
[ Сохраненная копия ]  Ссылки http://www.sao.ru/precise/Midas_doc/doc/94NOV/vol1/node40.html -- 12.2 Кб -- 23.02.1996
Похожие документы

6. http://www.atnf.csiro.au/computing/software/gipsy/sub/f2cvv_aux.dc3
... Category: SYSTEM File: f2cvv_aux.src Author: K.G. Begeman Use: For the ALLIANT the following functions are provided: A_ALLIANT( ARG ) Input integer (by value) L_ALLIANT( ARG ) Input integer (by value) RETURN_ COMPLEX _ALLIANT( FIE ) Input procedure FCALL_VOID_ALLIANT( F1, Input procedure STACK ) Input address FCALL_INT_ALLIANT( F2, Input procedure STACK ) Input address FCALL_BOOL_ALLIANT( F3, ...
[ Сохраненная копия ]  Ссылки http://www.atnf.csiro.au/computing/software/gipsy/sub/f2cvv_aux.dc3 -- 5.4 Кб -- 25.09.1993
Похожие документы

7. http://www.sao.ru/hq/zhe/DBMS/testdb.sql
Создание тестовой базы данных Kafedra BEGIN; DROP TABLE lectures; DROP TABLE students; DROP TABLE semestrs ; DROP TABLE courses ; DROP TABLE balls; COMMIT; */ BEGIN; /* Лекторы */ CREATE TABLE lectures ( id_lect INTEGER PRIMARY KEY, surname VARCHAR (50) NOT NULL , name VARCHAR (20) NOT NULL , patronim VARCHAR (50) NOT NULL , phone VARCHAR (20) NOT NULL , mail VARCHAR (20) NOT ...
[ Сохраненная копия ]  Ссылки http://www.sao.ru/hq/zhe/DBMS/testdb.sql -- 5.4 Кб -- 24.02.2010
[ Сохраненная копия ]  Ссылки http://jet.sao.ru/hq/zhe/DBMS/testdb.sql -- 5.4 Кб -- 24.02.2010
Похожие документы

8. Compound plot procedures
Next: NPOI raw packet data Up: Introduction Previous: NAT data Contents . These procedures use more elementary functions to produce diagnostic plots. plot_fdldelay , baseline _int [, beam _int ][, /slide ] Plot the residual FDL delay in microns. If keyword slide is 1, then open a sliding plot widget. plot_fdlpower , baseline _int [, beam _int ][, /sf ] Plot a power spectrum (or structure function if sf=1 ) of the delay. ... If beam is not specified, use currently loaded data. ...
[ Сохраненная копия ]  Ссылки http://www.eso.org/~chummel/oyster/manual/node243.html -- 10.4 Кб -- 28.04.2015
Похожие документы

9. CSPICE Routines: LX4SGN_C
... Abstract Scan a string from a specified starting position for the end of a signed integer. ... Brief_I/O VARIABLE I/O DESCRIPTION -------- --- -------------------------------------------------- string I Any character string. first I First character to scan from in string. last O Last character that is part of a signed integer. nchar O Number of characters in the signed integer. ... You could use this routine to locate the signed integers in the string as shown below. ... Link to routine source . ...
[ Сохраненная копия ]  Ссылки http://www.stsci.edu/~sontag/spicedocs/cspice/lx4sgn_c.html -- 6.9 Кб -- 17.12.2005
Похожие документы

10. http://www.arcetri.astro.it/irlab/doc/dat_hand.ps
OSSERVATORIO ASTROFISICO DI ARCETRI CENTRO PER L'ASTRONOMIA INFRAROSSA E LO STUDIO DEL MEZZO INTERSTELLARE LARGO ENRICO FERMI, 5 -- I­50125 FIRENZE Firenze, September 30, 1994 FROM: C. Baffa TO: Tirgo Staff SUBJECT: Data handling with Tirgo Nicmos3 instruments All data taken with Tirgo Nicmos3 instruments (Arnica and Longsp) are stored directly as standard FITS files at 16 bits integer format. ... The acquisition program never rewrites over an old file. ... An example in table 1. ...
[ Текст ]  Ссылки http://www.arcetri.astro.it/irlab/doc/dat_hand.ps -- 81.5 Кб -- 28.07.2005
Похожие документы

11. http://hea-www.harvard.edu/PINTofALE/pro/show_line.pro
pro show_line,wvl,flux,Z=Z, ion = ion , lambda = lambda , spec = spec ,order=order,$ wmark=wmark, fmark = fmark ,lmark=lmark,cmark=cmark, markc = markc ,$ xo=xo,yo=yo,oxr=oxr,oyr=oyr, _extra=e ;+ ;procedure show_line ; plot lines and label them ; ;syntax ; show_line,wvl,flux,Z=Z, ion = ion , lambda = lambda , spec = spec ,order=order,$ ; wmark=wmark, fmark = ...
[ Сохраненная копия ]  Ссылки http://hea-www.harvard.edu/PINTofALE/pro/show_line.pro -- 6.2 Кб -- 14.04.2005
Похожие документы

12. http://star.arm.ac.uk/f77to90/code/lab1_e.p
program RK1; (* A simple program in Pascal for Runge-Kutta's method for a first order differential equation. dy/dx = x^2 + sin (xy) y(1) = 2 *) var number , i : integer; h, k1, k2, k3, k4, x, y : real ; function f(x,y : real ) : real ; begin f := x*x + sin (x*y) end ; begin number := 1; while number 0 do begin x := 1.0; y := 2.0; writeln (' Give the number of steps '); read ( ...
[ Сохраненная копия ]  Ссылки http://star.arm.ac.uk/f77to90/code/lab1_e.p -- 2.3 Кб -- 09.01.1996
[ Сохраненная копия ]  Ссылки http://crydee.sai.msu.ru/f90/code/lab1_e.p -- 2.3 Кб -- 09.01.1996
Похожие документы
Еще в разделе: (Показать все результаты (>920) - crydee.sai.msu.ru/ )

13. FTS Dictionary Example
... MAXLEN parameter specifies maximum length of the number considered as a 'good' integer. ... If REJECTLONG = FALSE (default), than dictionary returns prefixed part of integer number with length MAXLEN . ... This is a dict_tmpl.c file. # include postgres.h # include utils/builtins.h # include fmgr.h #ifdef PG_MODULE_MAGIC PG_MODULE_MAGIC; #endif # include utils/ts_locale.h # include utils/ts_public.h # include utils/ts_utils.h typedef struct { int maxlen ; bool rejectlong ; } ...
[ Сохраненная копия ]  Ссылки http://www.sai.msu.su/~megera/postgres/fts/doc/fts-intdict-xmp.html -- 9.6 Кб -- 13.04.2008
Похожие документы
Еще в разделе: (Показать все результаты (>435) - www.sai.msu.su/ )

14. Астронет > Руководство по практической работе с каталогом Hipparcos
... Работа с ASCII | ... Распределение звезд по небесной сфере . ... Наиболее популярная из них - это проекция Хаммер-Айтофа, она была принята в качестве основной в описании Hipparcos и использовалась во многих первых публикациях. ... l,b:double; { Сферические координаты в радианах } . ... var s : double; . ... end ; . ... Если мы хотим построить проекции звезд Hipparcos в галактической системе координат, то нам необходимо перевести экваториальные координаты, приведенные в каталоге, в галактические. ...
[ Сохраненная копия ]  Ссылки http://www.astronet.ru/db/msg/1210304/node5.html -- 36.1 Кб -- 25.01.2006
Похожие документы
Еще в разделе: (Показать все результаты (>8453) - www.astronet.ru/ )

15. Паскаль для начинающих
Pascal (Паскаль) - язык программирования общего назначения. ... Это заголовок , описания , операторы . Заголовок программы содержит имя программы. Для версии ETH необходимо дополнительно указать источник и приемник данных для работы программы - файлы для ввода и вывода информации. ... Операторы должны находиться между словами begin и end . ... Пример . ... var n: integer; . ... var a: array [ 1..100 ] of integer ; . ... program primer; var x,y: integer ; . ... var a: file of integer ; . ...
[ Сохраненная копия ]  Ссылки http://www.schools.keldysh.ru/sch887/pascal.htm -- 31.0 Кб -- 13.02.2005
Похожие документы
Еще в разделе: (Показать все результаты (>18) - www.schools.keldysh.ru/ )

16. Sun World program complex
... Для многих видов расчетов требуется знать параметры атомов - . участвующих в образовании данной линии и атомов, . ... Запись об отдельном атоме выглядит следующим образом: TYPE TATOM = CLASS(TObject) (*--------- данные об одном атоме ------------*) NELT : integer; (* порядковый НОМЕР ЭЛЕМЕНТА в таблице Менделеева *) ATOM : string[2]; (* ИДЕНТИФИКАТОР АТОМА *) PAT : REAL; (* АТОМНЫЙ ВЕС *) ABUND: REAL; (* ОБИЛИЕ - LG(EPS_I/EPS_H)+12, текущее значение *) aEION: array [1..4] of real;(* ПОТ-АЛ ИОНИЗ.[ ...
[ Сохраненная копия ]  Ссылки http://www.uafo.ru/sw90/geda/mend.html -- 6.4 Кб -- 31.05.2015
Похожие документы
Еще в разделе: (Показать все результаты (>3) - www.uafo.ru/ )

17. http://www.apo.nmsu.edu/35m_operations/35m_manual/Instruments/CorMass/Files/cormass2.pro
pro cormass2,list ; ;procedure to pre-process CorMASS 'differenced' images to correct for reset ;voltage decay effects seen in NICMOS3 images. ... Sep '00 ; ; on_error,1 nl=numlines(list) ;find number of files print,'nl: ',nl files=strarr(nl) openr,lun,list,/get_lun readf,lun,files free_lun,lun for i=0,nl-1 do begin oldim=float(readfits(files[i],hdr)) d=size(oldim,/N_DIMENSIONS) if d GT 0 then begin magicsub2,oldim,procim sxaddhist,'Reset Decay Corrected w/ MagSub2',hdr,/PDU name=str_sep(files[i],'.' ...
[ Сохраненная копия ]  Ссылки http://www.apo.nmsu.edu/35m_operations/35m_manual/Instruments/CorMass/Files/cormass2.pro -- 2.4 Кб -- 08.07.2004
Похожие документы

18. http://star.arm.ac.uk/~csj/software_store/idlines/idlines.pro
... Command arguments: ; ; specfile - character string - name of file containing spectrum (and fit ) ; assumed to be x,y file with 3-line header ; linelist - character string - name of file containing linelist ; assumed to be in 'lte_lines' format ; xlo - real variable - lower limit of plot ; xhi - real variable - upper limit of plot ; atoms - integer vector - atomic numbers of spectra to be identified ; fit - integer variable - switch = 0 don't read or plot ...
[ Сохраненная копия ]  Ссылки http://star.arm.ac.uk/~csj/software_store/idlines/idlines.pro -- 11.6 Кб -- 02.06.2003
Похожие документы

19. Конференция "Дзета функции"
Организаторы: Michel Balazard (CNRS, Лаборатория Понселе) , Михаил Цфасман (CNRS, Лаборатория Понселе, ИППИ РАН) , Алексей Зыкин (Лаборатория Понселе, ГУ ВШЭ) . О конференции . ... Following Iwasawa s theory, such computations for K-groups can be recasted in terms of special values of zeta functions. ... Using special values of L-functions, he built an ideal J_K=k(m), and proposed a conjecture (for p odd). ... Страница Лаборатории Понселе . ...
[ Сохраненная копия ]  Ссылки http://www.mccme.ru/lifr/zykin/ru/zeta/talks/nicolas.html -- 4.3 Кб -- 30.06.2010
Похожие документы

20. Функция расчета лунных дней - Астрономия и компьютеры
... 1 час 1 день 1 неделя 1 месяц Навсегда . ... Общероссийская неделя "Астрономия на тротуаре" - 15-17 апреля . ... Практическая астрономия ? Астрономия и компьютеры (Модераторы: Deimos , Ed_Vazhorov ) ? Функция расчета лунных дней . ... milenium: Array[0..6] of extended = (0.0, 13.9, 27.7, 12.1, 25.9, 10.3, 24.2); . ... function GetDate(ypos1,ypos2,ypos3,ypos4,month,tmoon: integer): extended; . function MoonDayIs(ypos1,ypos2,ypos3,ypos4,month,day,hour: integer): extended; . ... result:=0; . ...
[ Сохраненная копия ]  Ссылки http://www.astronomy.ru/forum/index.php/topic,18236.0.html -- 36.0 Кб -- 10.04.2016
Похожие документы
Еще в разделе: (Показать все результаты (>61) - www.astronomy.ru/ )

1 | 2 | 3 | 4 | 5 | 6 | 7 | След.


Астронет | Научная сеть | ГАИШ МГУ | Поиск по МГУ | О проекте | Авторам

Комментарии, вопросы? Пишите: info@astronet.ru или сюда

Rambler's Top100 RFBR Яндекс цитирования