1) Cho doan chuong trinh sau: s:= 'abcde';write(pos('cba',s));Ket qua in ra man hinh la:A. 0 B....

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.

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)

Dưới đây là một vài câu hỏi có thể liên quan tới câu hỏi mà bạn gửi lên. Có thể trong đó có câu trả lời mà bạn cầ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:= '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)

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á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ắ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)

Nguyễn Thái Sơn

18 tháng 3 2022

1) Cho xau ki tu sau: s:= 'Nguyen Trai'. Lenh nao sau day cho ket qua 'Trai'

A. copy(s, 8, 4); B. delete(s, 1, 7); C. Ca A, B deu dung D. Ca A, B deu sai

#Tin học lớp 11

Vũ Trọng Hiếu

18 tháng 3 2022

Đúng(0)

Kimian Hajan Ruventaren

4 tháng 12 2021

Biến X có thể nhận các giá trị: '0' ; '1' ; '3' ; '5' ; '7' ; '9'. Khai bào biến nào sau đây đúng

A. Var X : Integer;

B. Var X : Real;

A. Var X : Char;

A. Var X : Byte;

#Tin học lớp 11

Nguyễn Lê Phước Thịnh

4 tháng 12 2021

Chọn C

Đú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)

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