1) Cho doan chuong trinh sau:s:= '123456';For i:= length(s) downto 1 do write(s[i]);Ket qua in ra man hinh la:A....

Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

Chọn lớp

Chọn môn

Mua vip

Nguyễn Thái Sơn

18 tháng 3 2022

1) Cho doan chuong trinh sau:

s:= '123456';

For i:= length(s) downto 1 do write(s[i]);

Ket qua in ra man hinh la:

A.'123456' B. '12345' C.'54321' D. '654321'

#Tin học lớp 11

Vũ Trọng Hiếu

18 tháng 3 2022

Đúng(0)

Các câu hỏi dưới đây có thể giống với câu hỏi trên

Nguyễn Thái Sơn

18 tháng 3 2022

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'

#Tin học lớp 11

Nguyễn Thái Sơn

18 tháng 3 2022

1) Cho doan chuong trinh sau:

s:= 'ABCDEF';

delete(s,3,2);

insert('XYZ',s,1);

write(s);

Ket qua in ra man hinh la:

A. 'ABXYZEF' B. 'ABEXYZF' C. 'AXYZ' D. 'AXYZBEF'

#Tin học lớp 11

Nguyễn Thái Sơn

18 tháng 3 2022

1) Cho doan chuong trinh sau:

s:= 'abcde';

write(pos('cba',s));

Ket qua in ra man hinh la:

A. 0 B.'0' C.3 D.'3'

#Tin học lớp 11

Mạnh=_=

18 tháng 3 2022

Đúng(0)

Nguyễn Khánh Linh

18 tháng 3 2022

Đúng(0)

Nguyễn Thái Sơn

18 tháng 3 2022

1) Cho doan chuong trinh sau:

s1:= '1234'; s2:='abc';

If length(s1) < length(s2) then writeln(s1) else writeln(s2);

Ket qua in ra man hinh la:

A. '1234' B. 'abc' C. '1234abc' D. 'abc1234'

#Tin học lớp 11

Nguyễn Thái Sơn

18 tháng 3 2022

1) Cho doan chuong trinh sau:

s1:= '123' ; s2:= 'abc';

insert(s1, s2, 2);

write(s1);

Ket qua in ra man hinh la:

A. 'a123bc' B.'1abc23' C.'123' D. 'abc123'

#Tin học lớp 11

Nguyễn Thắng

12 tháng 12 2018

phat hien va sua loi cu phap cho chuong trinh: in ra man hinh tong cac so le co trong day so Program tong_so_le; Var N, i : byte; Tong : integer; A: Array(1..250) of Integer ; begin write('Nhap gia tri cho N='); Readln(N); write('nhap gia tri cho day so'); For i=1 to N do Readln(A[i]); Tong :=0; For i :=1 to N do; If (A[i] mod 2<>0) then Tong :=Tong + A[i]; Write('Tong cac so le trong day so la: ',Dem); Readln End. ...

Đọc tiếp

#Tin học lớp 11

Trâm Nguyễn Thị Ngọc

21 tháng 12 2018

Sữa lỗi:

phần khai báo:a:array[1..250] of integer (ngoặc vuông ko phải ngoặc tròn)

Đúng(0)

Loi Nguyen

4 tháng 4 2021

Ai sửa giúp mình với type Myaray=array [0..9] of Integer; var i:Myaray;

s:String;

a,b:Integer;

begin

Write('nhap xau: ');

readln(s);

a:=0;

for b:=1 to length(s) do

while pos(i,s)<>0 do begin a:=a+1;

Write(a);

end;

while pos(i,s)=0 do write(a);

readln

end.

#Tin học lớp 11

nguyễn an phát

17 tháng 5 2021

sữa i bằng b đi bạn ơi

Đúng(0)

Nguyễn Cảnh Hùng

27 tháng 11 2017

Cho đoạn chương trình sau:

s:= ‘edcba’;

For i:= length(s) downto 1 do write(s[i]);

Kết quả in ra màn hình là:

A. ‘abcd’

B. ‘dcba’

C. ‘abcde’

D. ‘edcba’

#Tin học lớp 11

Đỗ Ngọc Trinh

27 tháng 11 2017

Đáp án đúng : C

Đúng(0)

Nguyễn Cảnh Hùng

30 tháng 1 2017

Cho đoạn chương trình sau:

s:= ‘54321’;

For i:= length(s) downto 1 do write(s[i]);

Kết quả in ra màn hình là:

A. ‘123456’

B. ‘12345’

C. ‘54321’

D. ‘654321’

#Tin học lớp 11

Đỗ Ngọc Trinh

30 tháng 1 2017

Đáp án đúng : B

Đúng(0)

Chúng tôi đề xuất

Tài nguyên

Ứng dụng mobile

Bảng xếp hạng

Các khóa học có thể bạn quan tâm

Yêu cầu VIP