Em cần gấp ạ. Một số có ba chữ số thỏa mãn điều kiện số ở hàng chục bằng tổng của số hàng đơn vị và hàng trăm luôn là bội của 11. Ví dụ: các số 253, 121, 110, 363, … là bội số của 11. Tuy nhiên không phải rằng tất cả các bội số của 11 có 3 chữ số đều thỏa mãn điều kiện trên ví dụ: 517 là bội của 11 nhưng 5+7=12 (12>1) Yêu cầu: Cho chuỗi S có độ dài tối đa 255 ký tự gồm các chữ số. Hãy tìm số lần xuất hiện của các số gồm 3 chữ số liên tiếp trong S là bội số của 11 thoải mãn điều kiện trên. Dữ liệu vào: cho trong file BOISO.INP gồm 1 dòng duy nhất chứa chuỗi S. Kết quả: xuất ra trong file BOISO.OUT gồm 1 dòng duy nhất là số lần xuất hiện của các số gồm 3 chữ số liên tiếp trong S là bội số của 11 thỏa mãn điều kiện trên. BOISO.INP BOISO.OUT 12535173110 2 1253736363 3
1 câu trả lời
var s:string;
i,d,k:word;
f1,f2:text;
const fi='BOISO.INP';
fo='BOISO.OUT';
begin
assign(f1,fi);reset(f1);
assign(f2,fo);rewrite(f2);
readln(f1,s);
val(copy(s,1,2),k);
for i:=3 to length(s) do
begin
k:=(k mod 100)*10+ord(s[i])-48;
if (k mod 11=0)and((k mod 10)+(k div 100)<10) then inc(d);
end;
writeln(f2,d);
close(f1);close(f2);
end.
