3GL
"" ?
,
, ,
.
. ,
,
.
( , , QBasic) 4 5 .
. -
.
. , , , .
. ,
, -
. .
.
.
, ,
. - ,
. ,
.
-,
-
.
.
-,
, ,
. ,
. ,
. .
, - .
, kl R2.
, , :
s:=0;
for j:=k1 to
k2 do s:=s+j;
. :
kl kl+1 kl+2
........ kl+(k2-kl)
kl+(k2-kl) k2-l
k2-2 ........ kl
(kl+k2), (k2-kl+1).
s:=(kl+k2)*(k2-kl+l)/2;
, .
-
,
.
-,
.
,
.
. -
- max (a,b,c).
10 INPUT ,,
20 IF > THEN GOTO 80
30 IF B>C THEN GOTO 60
40 PRINT " = ";
50 GOTO 100
60 PRINT " = ";
70 GOTO 100
80 IF A<C THEN GOTO 40
90 PRINT " = "; A
100 END
,
, ,
, 10. :
10 INPUT ,,
20 =
30 IF MAX<B THEN MAX=B
40 IF MAX<C THEN MAX=C
50 PRINT " = ";
, . ,
:
=(1)
FOR K=2 TO N
IF MAX<A(K) THEN MAX=A(K) NEXT
,
.
, (. snippet , ) , . , . , , . (IDE) . , Microsoft Visual Studio, Borland Developer Studio, . IDE Geany snippets.conf ( : /home/user/.config/geany) . , Macromedia Dreamweaver Zend Studio, -.
| | 10.11.2021 - 12:37: - Personalias -> WHO IS WHO - - _.
10.11.2021 - 12:36: - Conscience -> . ? - _.
10.11.2021 - 12:36: , , - Upbringing, Inlightening, Education -> ... - _.
10.11.2021 - 12:35: - Ecology -> - _.
10.11.2021 - 12:34: , - War, Politics and Science -> - _.
10.11.2021 - 12:34: , - War, Politics and Science -> . - _.
10.11.2021 - 12:34: , , - Upbringing, Inlightening, Education -> , - _.
10.11.2021 - 09:18: - New Technologies -> , 5G- - _.
10.11.2021 - 09:18: - Ecology -> - _.
10.11.2021 - 09:16: - Ecology -> - _.
10.11.2021 - 09:15: , , - Upbringing, Inlightening, Education -> - _.
10.11.2021 - 09:13: , , - Upbringing, Inlightening, Education -> - _.
|
