Câu hỏi:
13/07/2024 426Sách mới 2k7: 30 đề đánh giá năng lực DHQG Hà Nội, Tp. Hồ Chí Minh, BKHN 2025 mới nhất (600 trang - chỉ từ 140k).
Quảng cáo
Trả lời:
Lời giải:
const
fi='lohongcs.inp';
fo='lohongcs.out';
var
f:text;
i,s:integer;
n:longint;
a:array[0..9] of byte;
begin
assign(f,fi);
reset(f);
read(f,n);
for i:= 1 to n do
read(f,a[i]);
a[8]:=2;
a[0]:=1; a[4]:=1; a[6]:=1; a[9]:=1;
a[1]:=0; a[2]:=0; a[3]:=0; a[5]:=0; a[7]:=0;
close(F);
assign(f,fo);
rewrite(F);
s:=0;
repeat
i:=n mod 10;
s:=s+a[i];
n :=n div 10 ;
until n=0;
write(f,s);
close(F);
end.
CÂU HỎI HOT CÙNG CHỦ ĐỀ
Câu 3:
Câu 5:
Trong bảng sau đây, mỗi học sinh chỉ có mộ mã số (Mahs):
Khoá chính của bảng là:
Câu 6:
về câu hỏi!