var s: string;
i, d: byte;
begin
write('nhap xau: '); readln(s);
d:=0;
Writeln('co ', length(s), ' ki tu');
For i:=1 to length(s) do
If s[i]=' ' then inc(d);
Write('co ', d+1, ' tu');
Readln
End.
program tu_kitu;
uses crt;
var s:string;
i,d:byte;
clrscr;
write('Nhap xau: '); readln(s);
d:=1;
for i:=1 to length(s) do
if s[i]=' ' then d:=d+1;
writeln('Co ',d,' tu');
writeln('Co ',length(s),' ki tu');
readln;
end.
talk about one el speaking country you like most. Ko spam, gửi cho mình một bài hoàn chỉnh nhé, nước nào cũng đc. Mình cần trong hôm nay luôn. Mình cảm ơn trước nhé
đốt cháy hoàn toàn m gam 1 ancol no đơn chứ mạch hở sau phản ứng thu được 13,2 gam co2 và 8,1 gam H2O A/ tìm công thức cấu tạo và tính khối lượng m gam b/ oxi hóa m gam ancol trên bằng CUO , t độ thu chất B cho chất B tác dụng với dd AGNO3 /NH4 thu được bao nhiêu gam Ag.
nguyên nhân cấu tạo và hoạt động của nhiệt kế dùng chất lỏng dựa trên a.sự dãn nở vì nhiệt của chất lỏng b.sự dãn nở vì nhiệt của chất rắn c.sự dãn nở vì nhiệt của chất khí d.sự dãn nở vì nhiệt của các chất
Su hướng nhành giao thông vận tải biển
viết 1 đoạn văn ngắn khoảng 100 từ nói về nét đẹp truyền thống văn hóa của dân tộc việt nam
Viết dàn ý nghị luận về tệ nạn xã hội (bất kì các tệ nạn nào,có dẫn chứng,luận điểm,luận cứ nhiều ý hay, lập luận rõ ràng là được) p/s: Nếu na ná trên mạng thì dẹp ngay tư tưởng trả lời câu hỏi đi nhá :)))
nêu trách nhiệm của công dân trong công đồng
hoàn cảnh và quá trình ra đi tìm đường cứu nước của nguyễn tất thành.Theo em Nguyễn Tất Thành có gì khác vs những người đi trước
Trình bày những thuận lợi và khó khăn của tỉnh Hà Giang sau năm 1954?
viết 1 đoạn văn ngắn trình bày sũy nghĩ của anh chị về việc xác định mục tiêu để thành công của con người
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến