Dãy số đối xứng:
Cho một dãy số nguyên dương gồm N phần tử (1<=N<=100). Dãy số được gọi là đối xứng nếu viết các số theo thứ tự ngược lại ta vẫn được một dãy như dãy số ban đầu.
VD: Dãy số ban đầu là dãy số đối xứng 3,6,1,2,1,6,3.
-Dữ liệu vào: file văn bản DAYSO.INP.
+Dòng đầu chứa số nguyên n.
+Dòng thứ hai chứa n số nguyên dương, các số cách nhau một dấu cách.
-Kết quả: ghi vào file DAYSO.OUT gồm một số duy nhất là 1 nếu là dãy số đối xứng hoặc 0 nếu là dãy số không đối xứng.
Giúp mình nhe, rất biết ơn ạ!
Bằng cách nhấp vào Đăng nhập, bạn đồng ý Chính sách bảo mật và Điều khoản sử dụng của chúng tôi. Nếu đây không phải máy tính của bạn, để đảm bảo an toàn, hãy sử dụng Cửa sổ riêng tư (Tab ẩn danh) để đăng nhập (New Private Window / New Incognito Window).
Const Li='DAYSO.INP';
Lo='DAYSO.OUT';
Var f,g: text;
A: array[1..100] of longint;
n,i,j: longint;
ok: boolean;
Begin
Assign(f,Li); Reset(f);
Assign(g,Lo); Rewrite(g);
Readln(f,n);
For i:=1 to n d
Read(f,A[i]);
Ok:=true;
For i:=1 to n div 2 do
If A[i]<>A[n-i+1] then
Begin
Ok:=false ;
Break;
End;
If Ok=true then Write(g,'1')
Else
Write(g,'0');
Close(f);
Close(g);
End.
Tham gia Cộng đồng Lazi trên các mạng xã hội | |
Fanpage: | https://www.fb.com/lazi.vn |
Group: | https://www.fb.com/groups/lazi.vn |
Kênh FB: | https://m.me/j/AbY8WMG2VhCvgIcB |
LaziGo: | https://go.lazi.vn/join/lazigo |
Discord: | https://discord.gg/4vkBe6wJuU |
Youtube: | https://www.youtube.com/@lazi-vn |
Tiktok: | https://www.tiktok.com/@lazi.vn |
Hôm nay bạn thế nào? Hãy nhấp vào một lựa chọn, nếu may mắn bạn sẽ được tặng 50.000 xu từ Lazi
Vui | Buồn | Bình thường |