Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
uses crt;
var st:string;
i,d:integer;
begin
clrscr;
readln(st);
d:=length(st);
for i:=d downto 1 do
write(st[i]);
readln;
end.
Xin lỗi bạn nha muốn làm lắm nhưng bạn đang kiểm tra nên là tự làm nha!!
#include <bits/stdc++.h>
using namespace std;
long long a[10000],n,i;
int main()
{
freopen("bai2.inp","r",stdin);
freopen("bai2.out","w",stdout);
cin>>n;
for (i=1; i<=n; i++) cin>>a[i];
for (i=n; i>=1; i--) cout<<a[i]<<" ";
return 0;
}
#include <bits/stdc++.h>
using namespace std;
long long a[200],n,i;
int main()
{
cin>>n;
for (i=1; i<=n; i++)
cin>>a[i];
sort(a+1,a+n+1);
for (i=1; i<=n; i++) cout<<a[i]<<" ";
return 0;
}
Sửa đề: Kiểm tra N là số chẵn hay số lẻ
uses crt;
var n:longint;
begin
clrscr;
repeat
write('Nhap n='); readln(n);
until n>0;
if n mod 2=0 then writeln(n,' la so chan')
else writeln(n,' la so le');
readln;
end.
