K
Khách
Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
4T
3
Các câu hỏi dưới đây có thể giống với câu hỏi trên
4T
1
11 tháng 12 2020
a) var a:real;
b:string;
a:=20.5;
readln(b);
b) var x:string;
y:integer;
x:='Ha Noi';
readln(y);
KS
1
29 tháng 12 2022
a là kiểu dữ liếu số nhé (mãi mới thấy có người học scratch :))
DN
4
ML
9 tháng 4 2023
Program HOC24;
var i,d1,d2: byte;
s: string;
begin
write('Nhap xau: '); readln(s);
d1:=0; d2:=0;
for i:=1 to length(s) do
begin
if s[i] in ['0'..'9'] then d1:=d1+1;
if s[i] in ['A'..'z'] then d2:=d2+1;
end;
writeln('So ky tu so: ',d1);
write('So ky tu chu cai: ',d2);
readln
end.
Tham khảo/:
Để xử lý các chuỗi văn bản, Pascal đưa ra một kiểu dữ liệu mới gọi là xâu ký tự và được định nghĩa bằng từ khóa STRING. Xâu ký tự là dữ liệu bao gồm một dãy các ký tự trong bảng mã ASSCII. Cách khai báo: Var ten_xau: STRING[độ dài của xâu];
Tham khảo:
Để xử lý các chuỗi văn bản, Pascal đưa ra một kiểu dữ liệu mới gọi là xâu ký tự và được định nghĩa bằng từ khóa STRING. Xâu ký tự là dữ liệu bao gồm một dãy các ký tự trong bảng mã ASSCII. Cách khai báo: Var ten_xau: STRING[độ dài của xâu];