uses crt;var s:string; i,dem:byte;begin clrscr; write('Nhap xau: '); readln(s); for i:=1 to length(s) do if (s[i]=' ') then inc(dem); write('So luong ky tu trong trong xau la: ',dem); readlnend.
Program Hotboy ;
Uses crt;
var Hb:string;
i,d:byte;
Begin
Clrscr;
D:=0;
Write('Nhap xau tu ban phim ');
Readln(Hb);
For i:=1 to length(Hb) do
if (Hb[i]=' ') then inc(d);
Write('So ki tu trong trong xau do la: ',d);
Readln
End.
Lãi suất tiết kiệm là 0,5% một tháng .Bác Chiến gửi tiết kiệm 50 000 000 đồng. Hỏi sau một tháng cả số tiền gửi và tiền lãi bác Chiến thu được là bao nhiêu ?
Giai chi tiết câu 2 cho em với ạ
Dịch các cụm từ sau: -keep sb from Ving -play an important|part |role -compete against -competition - in|the world ovel| -score -goal -match -regard -space|time free| ai trả lời nhanh nhất mk cho 5 sao, 1 hay nhất và 1 cảm ơn
Viết đoạn văn chứng minh bản thân em đã làm để bảo vệ môi trường
Để đưa một vật có khối lượng 60kg lên cao 2m Người ta sử dụng một mặt phẳng nghiêng có chiều dài 8m thì lực kéo vật lên bằng mặt phẳng nghiêng là 250N. Tính hiệu suất của mặt phẳng nghiêng
trong tệp input.txt cho các điểm m,p,t,h, của 4 bạn cùng bàn tính điểm trung bình của mỗi bạn và đưa vào tệp output.txt mỗi điểm 1 dòng
Bài 1: Một ô tô đi từ A đến B và xe máy đi từ B về A.Sau 2 giờ ô tô và xe máy gặp nhau tại c.Vận tốc của ô tô là 60km/h,Vận tốc của xe máy là 40km/hính quãng đường AB Bài 2 QĐ AB dài 240km.Ô tô thứ nhất đi từ A đến B với vận tốc 65km/h,ô tô thứ hai đi từ B về A với vận tốc 55km/h.Nếu khởi hành cùng lúc thì sau bao lâu 2 xe găp nhau
Tại sao người ta lại nói : "rừng như một lá phổi xanh của trái đất
lm giúp mk 2câu này với ( giải thích giùm mk với ạ )
trong sự sinh sản của thực vật có hoa, bầu nhụy phát triển thành gì? a. quả chứa hạt b. phôi nằm trong hạt c. Hạt phấn d. Noãn
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
