program chu_a;
uses crt;
var s:string;
i,d:byte;
begin
clrscr;
write('Nhap xau: '); readln(s);
d:=0;
for i:=1 to length(s) do
if (s[i]='a') or (s[i]='A') then d:=d+1;
write('So ki tu a (khong phan biet) la: ',d);
readln;
end.
var s: string;
d: integer;
write ('nhap xau: '); readln (s);
writeln ('trong xau co ',d,' chu a');
gãy tay vẫn giữ phong độ :))
bấm điện thoại 1 ngón ma tốc độ
Giải giúp em vs mn cảm ơn mn nhiều ạ
Viết chương trình Pascal thực hiện các phép tính sau : tính tổng của các số chia hết cho 3 hoặc 7 trong khoảng từ 1 đến n
nghệ thuận chạm trổ trên gỗ , đá ... gọi là ...... khắc
Tytytytytytytytytytytyytytytytyt
câu 1: trình bày những chuyển biến về văn hóa xã hội nước ta thời kỳ bắc thuộc
Oxi đi vào trong cơ thể để làm gì
Hãy nói về đôi nét về nguyễn hoàng nguyên - rosie nguyễn - rác giả tuổi trẻ đáng giá bnh
Vẽ avt cuẢ TOY và viết chữ @rubymisa
hệ hô hấp gồm những cơ quan nào? Kể tên về 1 số bệnh về hô hấp
1. Biết 2/3 của một số là 40 . Tìm 7/10 của số đó 2. Tính giá trị của biểu thức 3 .bài giải
Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến
