Cho đoạn chương trình sau:
s := 'Mua Thu';
write(upcase(s[2]));
Kết quả in ra màn hình là:
A. ‘M’
B. ‘U’
C. ‘A’
D. ‘T’
Cho đoạn chương trình sau:
s := 'Mua Thu';
write(upcase(s[5]));
Kết quả in ra màn hình là:
A. ‘M’
B. ‘U’
C. ‘A’
D. ‘T’
Cho đoạn chương trình sau:
s := 'Mua Thu';
write(upcase(s[3]));
Kết quả in ra màn hình là:
A. ‘M’
B. ‘U’
C. ‘A’
D. ‘T’
Cho đoạn chương trình sau:
s := 'Mua Thu';
write(upcase(s[1]));
Kết quả in ra màn hình là:
A. ‘T’
B. ‘U’
C. ‘A’
D. ‘M’
Cho đoạn chương trình sau:
s := ‘Mua xuan’;
write(upcase(s[length(s)-2]));
Kết quả in ra màn hình là:
A. ‘X’
B. ‘U’
C. ‘A’
D. ‘N’
Cho đoạn chương trình sau:
s := ‘Mua xuan’;
write(upcase(s[length(s)]));
Kết quả in ra màn hình là:
A. ‘X’
B. ‘U’
C. ‘A’
D. ‘N’
Cho đoạn chương trình sau:
s := ‘Mua xuan’;
write(upcase(s[length(s)-3]));
Kết quả in ra màn hình là:
A. ‘U’
B. ‘A’
C. ‘X’
D. ‘N’
Cho đoạn chương trình sau:
s := ‘Mua xuan’;
write(upcase(s[length(s)-1]));
Kết quả in ra màn hình là:
A. ‘X’
B. ‘U’
C. ‘A’
D. ‘N’
1) Cho doan chuong trinh sau:
s:= 'Mua xuan'
write(upcase(s[length(s)-2]));
Ket qua in ra man hinh la:
A. 'X' B.'U' C.'A' D. 'N'
Câu 1: Cho s và i là biến nguyên,Khi chạy đoạn chương trình sau:
S:=0 ; i:+0
While i<3 do begin i:=i+1;
s:=s+i*i;end;
writeln(s);
Kết quả in lên màn hình s là bao nhiêu ?
Câu 2: số thực a,b nhập từ bàn phím . tính giá trị biểu thứ
S= a^2 +b^2 In ra S
giúp mình với mai mình ktra rùi :((
Câu 1:
s=0; i=0
Vòng lặp thứ 1: i<3 -> đúng -> i=i+1=0+1=1; s=s+i*i=0+1*1=1
Vòng lặp thứ 2: i<3 -> đúng -> i=i+1=1+1=2; s=s+i*i=1+2*2=5
Vòng lặp thứ 3: i<3 -> đúng -> i=i+1=2+1=3; s=s+i*i=5+3*3=14
Vòng lặp thứ 4: i<3 -> sai -> không thực hiện vòng lặp -> kết thúc vòng lặp
Vậy kết quả S in ra màn hình là 14
Câu 2:
Program HOC24;
var a,b: integer;
s: longint;
begin
write('Nhap a: '); readln(a);
write('Nhap b: '); readln(b);
s:=a*a+b*b;
write('S= ',s);
readln
end.