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.
mình đang cần gấp!!!!
Giúp mình với các bạn
Giúp em với các thầy cô
uses crt;
var a:array[1..100]of integer;
i,n,kt,kt1:integer;
begin
clrscr;
write('Nhap n='); readln(n);
for i:=1 to n do
begin
write('A[',i,']='); readln(a[i]);
end;
kt:=0;
for i:=1 to n do
if a[i]<>a[n-i+1] then kt:=1;
if kt=0 then writeln('Day la mang doi xung')
else writeln('Day khong la mang doi xung');
kt1:=0;
for i:=1 to n-1 do
if a[i]>a[i+1] then kt1:=1;
if kt1=0 then writeln('Day la mang tang dan')
else writeln('Day khong la mang tang dan');
readln;
end.
Tạo biểu đồ:
B1:Chọn 1 ô trong miền có dữ liệu cần vẽ biểu đồ
B2:Nháy nút Chart Wizard trên thanh công cụ
B3:Nháy liên tiếp nút Next trên các hộp thoại nháy nút Finsish trên hộp thoại cuối cùng ( khi nút Next mở đi ) kết quả hiện lên biểu đồ
Chúc bn học tốt
1,Chon 1 o trong mien co du lieu can ve bieu do
2.Nhay nut Chart Wizard tren thanh cong cu
3,Nhay lien tiep nut Next tren cac hop thoai nhay nut Finsish tren hop thoai cuoi cung=> ket qua la bieu do ban muon
Olm chào em, cảm ơn em đã đồng hành cùng Olm, chúc em học tập hiệu quả và vui vẻ cùng Olm. Cảm ơn em đã đánh giá bài học, bài giảng của Olm.