ngày THI ĐẤU OLM tối nay, ngày 28/04/2023 để so tài với học sinh toàn quốc!!!

Ôn tập kiểm tra học kì 2 hiệu quả, đạt thành tích cao!

K
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.

Tất cả Toán Vật lý Hóa học Sinh học Ngữ văn Tiếng anh Lịch sử Địa lý Tin học Công nghệ Giáo dục công dân Âm nhạc Mỹ thuật Tiếng anh thí điểm Lịch sử và Địa lý Thể dục Khoa học Tự nhiên và xã hội Đạo đức Thủ công Quốc phòng an ninh Tiếng việt Khoa học tự nhiên
Mua vip
NT
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
0
NT
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
0
NT
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
1
VT
Vũ Trọng Hiếu
18 tháng 3 2022

d

Đúng(0)
NT
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
0
NT
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
0
NT
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

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.
#Tin học lớp 11
1
TN
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)
NT
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
1
VT
Vũ Trọng Hiếu
18 tháng 3 2022

d

Đúng(0)
KH
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
1
NL
Nguyễn Lê Phước Thịnh
4 tháng 12 2021

Chọn C

Đúng(0)
LN
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
1
NA
nguyễn an phát
17 tháng 5 2021

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

Đúng(0)
Bảng xếp hạng
Tất cả Toán Vật lý Hóa học Sinh học Ngữ văn Tiếng anh Lịch sử Địa lý Tin học Công nghệ Giáo dục công dân Âm nhạc Mỹ thuật Tiếng anh thí điểm Lịch sử và Địa lý Thể dục Khoa học Tự nhiên và xã hội Đạo đức Thủ công Quốc phòng an ninh Tiếng việt Khoa học tự nhiên
  • Tuần
  • Tháng
  • Năm
Các khóa học có thể bạn quan tâm
Tổng thanh toán: 0đ (Tiết kiệm: 0đ)
Tới giỏ hàng
Yêu cầu VIP