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/12/25 15:45:19
SETTALKOFFSETTALKOFFSETTALKOFFSETTALKOFFCLEARDIMENSIONA(5)FORK=1TO4A(K)=15-K*KENDFORK=3DOWHILEK>=1A(

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语言?