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.

3 tháng 5 2023

Câu 3

Var st:string;

i,d:integer;

Begin

Write('Nhap xau ky tu ');readln(st);

For i:=1 to length(st) do

If st[i] in ['0'..'9'] then d:=d+1;

Write('Co ',d,' ky tu so');

Readln

End.

3 tháng 5 2023

Câu 4

Var a:array[1..1000] of integer;

i,n:integer;

Begin

Write('n = ');readln(n);

For i:=1 to n do

Begin

Write('Nhap so thu ',i);readln(a[i]);

End;

Write('Cac so chia het cho 3 hoac 5 la: ');

for i:=1 to n do

If (a[i] mod 3 = 0) or (a[i] mod 5 = 0) then write(a[i]:8);

Readln

End.

31 tháng 3 2021

Bước 1:

- Nháy chuột chọn 1 ô trong cột ĐTB

- Mở dải lệnh Data và chọn lệnh Filter trong nhóm Sort & Filte

Bước 2:

- Nháy chuột vào biểu tượng mũi tên trên hàng tiêu đề cột ĐTB

-Nháy chuột chọn điểm thấp hơn 8.0 rồi nháy OK

Câu 1: B,C

Câu 2: B

4 tháng 5 2021

undefinedundefined

5 tháng 4 2021

Đơn giản vì chuột là loài động vật ăn tạp và có răng phát triển nhanh, do đó, để mài mòn răng, chúng phải “gặm” bất cứ thứ gì. Đó là lý do vì sao mà ngay cả các đồ vật, vật dụng trong nhà đều không thoát khỏi tay chuột. Bạn có thể tham khảo nhé. Chúc bạn mai thi tốt :D 

5 tháng 4 2021

Cảm ơn bn nhiều.hihi

 

Bạn tham khảo link :         https://download.vn/bo-de-thi-hoc-ki-2-mon-ngu-van-lop-6-37368

27 tháng 12 2023

nhanh với ạaa