Aolor:=‘green‘;
Bwriteln(green);
Cwriteln(color);
Da:=color=red;
第2题
Aassign(f1,‘abc.dat‘); write(f1,n); rewrite(f1); close(f1);
Bassign(f1,‘abc.dat‘); reset(f1); readln(f1,n); close(f1);
Cassign(f1,‘abc.dat‘); rewrite(f1); writeln(f1,n); close(f1);
Dassign(f1,‘abc,dat‘); rewrite(f1); read(f1,n); close(f1);
第3题
Ai:=4; repeat writeln(‘verygood!‘); until i=4
Bi:=4; repeat writeln(‘verygood!‘); until i>4
Ci:=4; repeat writeln(‘verygood!‘); until i5
第4题
有下列程序 program test(input,output); var s:integer; ch:char; count:array[‘a‘..‘z‘]of integer; begin for ch:=‘a‘to‘z‘do count[ch]:=0; read(ch); while not eoln do begin if(ch>=‘a‘)and(chx[5])and(x[c]/c0) or not(x[a+b]>(a+b))的值是( )。
Atrue
Bfalse
C0
D1
请帮忙给出正确答案和分析,谢谢!
为了保护您的账号安全,请在“上学吧”公众号进行验证,点击“官网服务”-“账号验证”后输入验证码“”完成验证,验证成功后方可继续查看答案!