SET TALK OFFSET TALK OFFSET TALK OFFSET TALK OFFCLEARDIMENSION A(5)FOR K=1 TO 4A(K)=15-K*KENDFORK=3DO WHILE K>=1A(K)=A(K)-A(K+1)K=K-1ENDDOA(1),A(2),A(3),A(4),A(5)SET TALK ONRETURN    运行结果是:

来源:学生作业帮助网 编辑:作业帮 时间:2024/08/04 17:51:13
SET TALK OFFSET TALK OFFSET TALK OFFSET TALK OFFCLEARDIMENSION A(5)FOR K=1 TO 4A(K)=15-K*KENDFORK=3DO WHILE K>=1A(K)=A(K)-A(K+1)K=K-1ENDDOA(1),A(2),A(3),A(4),A(5)SET TALK ONRETURN    运行结果是:
x) v QqVws#amk`ikh5vWqU5+@BP[QPSQDa/5$4qC?ž'?7ٌ̲I*'W `Y !,]0g0q1ȾGhB r`8p*"h.!af ;Ovy/֯}A/)8ʶ/.H̳

SET TALK OFFSET TALK OFFSET TALK OFFSET TALK OFFCLEARDIMENSION A(5)FOR K=1 TO 4A(K)=15-K*KENDFORK=3DO WHILE K>=1A(K)=A(K)-A(K+1)K=K-1ENDDOA(1),A(2),A(3),A(4),A(5)SET TALK ONRETURN    运行结果是:
SET TALK OFFSET TALK OFFSET TALK OFF
SET TALK OFF
CLEAR
DIMENSION A(5)
FOR K=1 TO 4
A(K)=15-K*K
ENDFOR
K=3
DO WHILE K>=1
A(K)=A(K)-A(K+1)
K=K-1
ENDDO
A(1),A(2),A(3),A(4),A(5)
SET TALK ON
RETURN
    运行结果是:

SET TALK OFFSET TALK OFFSET TALK OFFSET TALK OFFCLEARDIMENSION A(5)FOR K=1 TO 4A(K)=15-K*KENDFORK=3DO WHILE K>=1A(K)=A(K)-A(K+1)K=K-1ENDDOA(1),A(2),A(3),A(4),A(5)SET TALK ONRETURN    运行结果是:
不是c语言.basic语言?