giúp mk 2 câu với ạ, mai mk thi rồi
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.
Những câu hỏi liên quan
TH
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
NN
0
TT
0
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
14 tháng 5 2021
Bạn tham khảo link : https://download.vn/bo-de-thi-hoc-ki-2-mon-ngu-van-lop-6-37368
NN
1
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.
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.