Viết chương trình nhập N từ từ bàn phím (0 < N < 10), viết ra màn hình kết quả là ghộp lần lượt các từ theo thứ tự xuôi và ngược. Ví dụ: N = 4, gồm 4 từ “hoc”, “lap”, “trinh”, “vui” Kết quả trên màn hình gồm: Dòng 1: “hoc lap trinh vui” Dòng 2: “vui trinh lap hoc” Chú ý: Để nối 2 từ với nhau ta dùng phép cộng xâu VD: s1=’ab’ ; s2=’cd’ ; s3=s1+s2 ta được ’abcd’ ; s4=s2+s1 ta được ‘cdab’ (pascal)

1 câu trả lời

program sksk;
uses crt;
var a : array[1..100] of string;
    i, n: integer; 
    s, s1 : string;
begin
clrscr;
write(' nhap so tu co trong mang :'); readln( n );
s := ' ';
s1 := ' ';
for i := 1 to n do 
begin
write(' nhap tu thu ', i ,': '); readln( a[i]);
s := s + ' '+ a[i]; 
end;
for i := n  downto  1  do 
s1 := s1 + ' ' + a[i];
writeln( s ,' ' );
writeln( s1 ,' ');
readln
end.