Viết chuơng trình nhập vao một xâu từ bán phim không quá 80 ki tự. - Đưa xâu vừa nhập ra màn hình.

huykhanh

2 năm trước

Viết chuơng trình nhập vao một xâu từ bán phim không quá 80 ki tự. - Đưa xâu vừa nhập ra màn hình. - Đếm và đưa ra màn hình xâu có bao ki tự.

Loga Sinh Học lớp 12

0 lượt thích 14 xem

1 trả lời

Thích Trả lời

dothingocanh2018

uses crt;
var st : string;
i,dem :integer;
begin clrscr;
dem:=0;
write('Nhap xau ki tu :'); readln(st);
writeln('Xau ki tu vua nhap la :', st);
for i:=length(st) downto 1 do dem:=dem+1;
write('Xau tren co', dem,'ki tu');
readln
end.

Vote (0) Phản hồi (0) 2 năm trước

Toancon997

program oken;
uses crt;
var s: string[80];
dem,i: byte;
begin
clrscr;
write('Nhap xau: '); readln(s);
writeln('Xau vua nhap: ',s);
for i:=1 to length(s) do
if (s[i] in ['a'..'z']) or (s[i] in ['A'..'Z']) then
dem:=dem+1;
writeln('So ky tu trong xau: ',dem);
readln;
end.

Vote (0) Phản hồi (0) 2 năm trước

Các câu hỏi liên quan

Nếu a chia hết cho b, b chia hết cho c thì sao?

Giải giúp e bài này với E cần gấp Helpppppp

một số nghề của địa phương,những thuận lợi và khó khăn hiện nay,quá trình hoạt động của một số nghề đó

Đặc điểm nào của chim giúp chúng thích nghi với đời sống bay KO COPY

1 máy xúc cắt theo kế hoạch mỗi ngày phải xúc 45 mét khối. Do đó đã hoàn thành trước thời hạn 2 ngày mà còn vượt mức 30 mét khối đất . Tính khối lượng đấy mà mấy phải xúc theo kế hoạch

51,32 ×99 +51,32+51,32 ×24+51,32 ×876 làm hộ mik câu trên nha

vì sao bán cầu não trái lại điều khiển hoạt động của hệ vận động bên phải và ngược lại.

bằng phương pháp hóa học nhận biết các chất : metan, but-1-in, but-2-in

mn giúp mình phàn vận dụng sgk t102-103 với ạ làm hết phần vận dụng nha đừng spam của em nữa nha

Số viên bi của ba bạn Minh Hùng Dũng ỉ lệ với các số 2,4,5tính số viên bi của mỗi bạn, biết rằng ba bạn có tất cả 44 viên bi.

Loga.vn - Cộng Đồng Luyện Thi Trực Tuyến