OPTADS360
ATNETWORK
ATNETWORK
YOMEDIA
Banner-Video
IN_IMAGE

Tại sao p = p-48×length (s) trong đoạn chương trình sau:

Program Tong_chu_so;

Var s:string;

i:byte;

p:integer;{bien luu tong}

begin

write('Nhap so: ');readln(s);

for i:=1 to length(s) do p:=p+ord(s[i]);

p:=p-48*length(s);

writeln(p);

Readln

End

  bởi Đào Nguyên 21/03/2022
ADMICRO/lession_isads=0

Câu trả lời (0)

Nếu bạn hỏi, bạn chỉ thu về một câu trả lời.
Nhưng khi bạn suy nghĩ trả lời, bạn sẽ thu về gấp bội!

Lưu ý: Các trường hợp cố tình spam câu trả lời hoặc bị báo xấu trên 5 lần sẽ bị khóa tài khoản

Gửi câu trả lời Hủy
 
 

Các câu hỏi mới

NONE
OFF