K
Khách

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.

18 tháng 12 2021

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!!

18 tháng 12 2021

ko p bài của minh đâu

 

Câu 5: D

 

18 tháng 12 2021

#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;

}

20 tháng 12 2020

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.