,
, ,
.
|
|
|
||
1 |
|
|
||
2 |
|
|
||
3 |
|
|
||
4 |
|
|
||
5 |
|
|
||
. ,
,
.
( , , QBasic) 4 5 .
. -
.
. , , , .
. ,
, -
. .
.
.
, ,
. - ,
. ,
.
-,
-
.
.
-,
, ,
. ,
. ,
. .
, - .
, kl R2.
, , :
. :
(kl+k2), (k2-kl+1).
, .
-
,
.
-,
.
,
.
. -
- 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
, .
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 -> - _. |