Hậu thường xuyên tham gia thi lập trình trên mạng. Vì đạt được thành tích cao nên Hậu được gửi tặng một khoá học tin học. Trung tâm cung cấp cho Hậu một mã số
Hậu thường xuyên tham gia thi lập trình trên mạng. Vì đạt được thành tích cao nên Hậu được gửi tặng một khoá học tin học. Trung tâm cung cấp cho Hậu một mã số là một số nguyên dương N có không quá 19 chữ số. Để tham gia khoá học, Hậu phải nhập vào mật khẩu của khoá học. Mật khẩu là một số nguyên dương M được tạo ra bằng cách tính tổng giá trị các chữ số của N. Yêu cầu: Hãy tìm số nguyên dương M. Dữ liệu vào: Cho trong file văn bản MATKHAU.INP có cấu trúc như sau: - Dòng 1: gồm 1 dòng chứ số nguyên dương n Dữ liệu ra: Ghi ra file văn bản MATKHAU.OUT theo cấu trúc như sau: - Dòng 2: gồm một dòng kết quả tìm được.
Lời giải 1 :
var n:string;
m,k,i,c:integer;
f1,f2:text;
Begin
assign(f1,'MK.INP');reset(f1);
assign(f2,'MK.OUT');rewrite(f2);
read(f1,n);
while i<>length(n) do
begin
i:=i+1;
val(n[i],k,c);
m:=m+k;
end;
write(f2,m);
close(f1); close(f2);
End.
Thảo luận
Có thể bạn quan tâm
Bạn có biết?
Tin học, tiếng Anh: informatics, tiếng Pháp: informatique, là một ngành khoa học chuyên nghiên cứu quá trình tự động hóa việc tổ chức, lưu trữ, xử lý và truyền dẫn thông tin của một hệ thống máy tính cụ thể hoặc trừu tượng (ảo). Với cách hiểu hiện nay, tin học bao hàm tất cả các nghiên cứu và kỹ thuật có liên quan đến việc mô phỏng, biến đổi và tái tạo thông tin.
Nguồn : Wikipedia - Bách khoa toàn thưTâm sự 8
Lớp 8 - Năm thứ ba ở cấp trung học cơ sở, học tập bắt đầu nặng dần, sang năm lại là năm cuối cấp áp lực lớn dần nhưng các em vẫn phải chú ý sức khỏe nhé!
Nguồn : ADMIN :))Copyright © 2021 HOCTAP247