program phuongt;uses crt; var s: string; d, i: integer;begin clrscr; write('Nhap xau S = '); readln(s); for i:=1 to length(s) do if s[i]=' ' then d:=d+1; write('Vay xau S co tat ca ', d+1, ' tu'); readlnend.
Program So_tu;
Uses crt;
Var i,dem: integer;
S: string;
Begin
Clrscr;
Write(‘Nhap xau S: ‘); Readln(S);
Dem:=0;
S:=S+’ ‘;
For i:=1 to length(S) do
If S[i]=#32 then dem:=dem+1;
Writeln(‘Trong xau co tat ca’,dem,’tu’);
End.
Khi điều chỉnh nút chọn sóng trên máy thu thanh anh chị đã tác động lên khối nào? Giải thích vì sao mà máy thu thanh chỉ chọn đúng sóng cần thu trong vô vàn các sóng trong không gian?
In pairs, use your notes to tell your partner about your city. Then, listen and write down notes about your partner's city in the space below. viết hộ mik nhé !!!
tìm hiểu về Thăng Long-Kẻ Chợ thế kỷ 18,chép mạng cũng đc nhưng đầy đủ phần nông nghiệp,công nghiệp vs thương nghiệp hộ mình nha^-^.Ai làm chi tiết vs đầy đủ mình vote 5 sao,tim vs ctrlhn nha.:333.Mong mọi ng làm giúp mình.=_=
Viết dàn ý chi tiết tả cảnh lớp học trong giờ kiểm tra văn. Nhớ không được copy mạng. Dài và chi tiết. Hứa cho 5 sao ai viết dài, nhanh và chi tiết. 50 điểm đang đón chờ các bạn
Hiups mik vs mn ơi Mik đang cần gắp lắm mn
giúp câu 8 [Chỉ cần đáp án] Hoặc CẢ 1,2 Hoặc mỗi câu 8 nhá
1 máy biến thế của cuộn dây sợ cấp là 1500 vòng cuộn thế cấp là 2000 vòng a) máy biến thế trên là máy tăng thế hay hạ thế b)nếu đặt vào 2 đầu cuộn dây sơ cấp 1 hiệu điện thế 110V thì hiệu điện thế thu đc ở 2 đầu cuộn dây là bao nhiêu
trình bày nguyên nhân và diễn biến(không bắt buộc) của cuộc kháng chiến Mông-Nguyên lần thứ nhất
kể tên 1 số hình thức hô hấp ở 1 số loài sinh vật mà em biết. Giúp mình với @@
Vẽ anime đôi Ai để avt đôi khum Từ giờ cày đến 300đ, k đặt nữa haha
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
