. - 3GL   - 4GL   5GL  

3GL

"" ?

, , , .




1



2



3



4



5



. , , . ( , , 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 

, .

      . - 3GL   - 4GL   5GL  

, - , , .




 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 -> - _.
Bourabai Research -  XXI Bourabai Research Institution