Napiste program, ktory z dvoch zadanych cisiel vybere vacsie.
VSTUP: A, B
VYSTUP: C (vacsie cislo, nez A, B)
10 INPUT "A,B";A,B
20 IF A>B THEN C=A
30 IF B>A THEN C=B
40 PRINT C
V knizke bol uvedeny priklad s podmienenym prikazom a skokmi.
10 REM MAXIMUM Z DVOCH HODNOT
20 INPUT "A,B";A,B
30 IF A>B THEN GOTO 60
40 C=B
50 GOTO 70
60 C=A
70 REM
80 PRINT "MAX:";C
90 END
Nabuduce: Napiste program, ktory z troch zadanych cisiel vybere najvacsie.
Podobné články:
3 Responses to “Kurz Atari Basicu 0.3”
A víš co je složité? Spojit dvě řeťězcové proměnné do jiné, to už je v Atari Basicu, skoro vysoká škola, než jsem na to přišel tak mne málem kleplo.
To není jen A$+B$=C$
@holyna fuh.. zamyslel som sa nad tym na chvilu, ale hned ma to akosi preslo :)
Neni to zas az tak vysoka skola, staci cist prirucky a pochopit jak na Atarku prace s retezci funguje, pak je to naprosto jednoduche a logicke (a umoznuje to delat i spoustu lepsich veci nez jen proste spojeni retezcu):
DIM A$(100),B$(100),C$(200)
A$=”UMIME PROGRAMOVAT ”
B$=”V BASICU”
C$=A$
C$(LEN(A$)+1)=B$
PRINT C$