THÔNG TIN CÔNG NGHỆ - GIẢI TRÍ - HỌC TẬP - TIN HỌC!
Diễn đàn Nhóm sinh viên CNTT chào mừng Bạn!
Nếu u chưa có tài khoản xin hãy đăng nhập
Nếu đã có tài khoản rồi thì hãy đăng nhập để cùng trao đổi thông tin, chia sẽ kinh nghiệm,.. học tập Tin học nhé!
Cám ơn các bạn nhiều!
Ban Quản Trị!

THÔNG TIN CÔNG NGHỆ - GIẢI TRÍ - HỌC TẬP - TIN HỌC!

NHÓM SINH VIÊN CNTT - CHÀO MỪNG BẠN ĐÃ QUAY TRỞ LẠI!
 
IndexIndex    Trợ giúpTrợ giúp  Tìm kiếmTìm kiếm  NhómNhóm  Đăng kýĐăng ký  Đăng NhậpĐăng Nhập  
Đăng Nhập
Tên truy cập:
Mật khẩu:
Đăng nhập tự động mỗi khi truy cập: 
:: Quên mật khẩu
Latest topics
Tìm kiếm
 
 

Display results as :
 
Rechercher Advanced Search
Top posting users this month

Share | 
 

 Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11

Xem chủ đề cũ hơn Xem chủ đề mới hơn Go down 
Tác giảThông điệp
knock2810
Thiếu úy
Thiếu úy


Bài gửi : 43
Tổng điêm: : 79
Được cảm ơn: : 2
Tham gia: : 12/02/2009

Bài gửiTiêu đề: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Fri 12 Mar 2010 - 23:30

Mình mở topic này để mọi người có thể post những bài tập trong sách giáo khoa lớp 11 lên để mọi người cùng tham khảo
Bài 4.36
Code:

type kA= array[1..100] of integer;
var i,k,n:integer;A: kA;
BEGIN
    Write(' Nhap n:');readln(n) ;
    for i:=1 to n do
        begin
              write(' A[',i,']=');
              readln(A[i]);
        end;
    write(' cac cuc dai dia phuong: ');
    for i:=1 to n do
        if (((i=1) and (a[1]>a[2])) or ((a[i]>a[i-1])and(a[i]>a[i+1])) or ((i=n) and (a[n]>a[n-1]))) then
          write(a[i],'  ');
    readln;
END.
Về Đầu Trang Go down
Xem lý lịch thành viên
knock2810
Thiếu úy
Thiếu úy


Bài gửi : 43
Tổng điêm: : 79
Được cảm ơn: : 2
Tham gia: : 12/02/2009

Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Sat 13 Mar 2010 - 0:04

Bài 4.10
Code:
type kA= array[1..100] of integer;
    kB= array[1..100] of integer;                                          vf
    kC= array[1..100] of integer;
var i,k,n:integer;A: kA;B:KB;C:KC;
BEGIN
    Write(' Nhap n:');readln(n) ;
    for i:=1 to n do
        begin
              write(' A[',i,']=');
              readln(A[i]);
        end;
    for i:=1 to n do
        begin
              write(' B[',i,']=');readln(B[i]);
        end;
    For i:=1 to n do  c[2*i-1]:=a[i] ;
    For i:=1 to n do  c[2*i]:=b[i];
    writeln('DAy A');
    for i:=1 to n do write(A[i],'  ');
    writeln;
    writeln('DAy B');
    for i:=1 to n do write(B[i],'  ');
    writeln;
    writeln('DAy C');
    for i:=1 to 2*n do write(C[i],'  ');
    writeln;
    readln;

END.
Về Đầu Trang Go down
Xem lý lịch thành viên
knock2810
Thiếu úy
Thiếu úy


Bài gửi : 43
Tổng điêm: : 79
Được cảm ơn: : 2
Tham gia: : 12/02/2009

Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Sat 13 Mar 2010 - 0:06

Bài 4.11
Code:
type kA= array[1..100] of integer;
    kB= array[1..100] of integer;
    kC= array[1..100] of integer;
var i,j,k,n:integer;A: kA;B:KB;C:KC;
BEGIN
    Write(' Nhap n:');readln(n) ;
    for i:=1 to n do
        repeat
              write(' A[',i,']=');
              readln(A[i]);
        until (a[i] <= 32000);
    for i:=1 to n do
        repeat
              write(' B[',i,']=');readln(B[i]);
        until( b[i] <= 32000);
        j:=1;k:=1; a[n+1]:=32001;b[n+1]:=32001;
    for i:=1 to 2*n do
        if (A[j]<b[k]) then begin c[i]:=a[j]; inc(j); end
            else begin c[i]:=b[k]; inc(k); end;
    writeln('DAy A');
    for i:=1 to n do write(A[i],'  ');
    writeln;
    writeln('DAy B');
    for i:=1 to n do write(B[i],'  ');
    writeln;
    writeln('DAy C');
    for i:=1 to 2*n do write(C[i],'  ');
    writeln;
    readln;
END.
Về Đầu Trang Go down
Xem lý lịch thành viên
knock2810
Thiếu úy
Thiếu úy


Bài gửi : 43
Tổng điêm: : 79
Được cảm ơn: : 2
Tham gia: : 12/02/2009

Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Sat 13 Mar 2010 - 0:07

Bài 4.12
Code:
type kA= array[1..100] of integer;
var i,max,min,tg,vtmax,vtmin,n:integer;A: kA;
BEGIN
    Write(' Nhap n:');readln(n) ;
    for i:=1 to n do
        begin
              write(' A[',i,']=');
              readln(A[i]);
        end;
    vtmin:=1;vtmin:=n;
    max:=a[n];min:=a[1];
    for i:=1 to n do
              if (a[i]<=min) then begin min:=a[i]; vtmin:=i; end;
    for i:=n downto 1 do
              if (a[i]>=max) then begin max:=a[i];vtmax:=i; end;
    write(' vi tri max',vtmax,'vi tri min',vtmin);
    writeln('DAy truoc');
    for i:=1 to n do write(a[i],'  ');
    writeln;
    tg:=a[vtmin];
    a[vtmin]:=a[vtmax];
    a[vtmax]:=tg;
    writeln('DAy sau  ');
    for i:=1 to n do write(a[i],'  ');
    writeln;
    readln;

 END.

Về Đầu Trang Go down
Xem lý lịch thành viên
knock2810
Thiếu úy
Thiếu úy


Bài gửi : 43
Tổng điêm: : 79
Được cảm ơn: : 2
Tham gia: : 12/02/2009

Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Sat 13 Mar 2010 - 10:13

bai 4.37
Code:
var thang,p:string;i:integer;
BEGIN
    write(' nhap thang ');readln(thang);
    write( ' mua la: ');
    for i:=1 to length(thang) do thang[i]:=upcase(thang[i]);
    p:='GIENGHAIBATUNAMSAUBAYTAMCHINMUOIMOTCHAP';
    { ham kiem tra xau thang co xuat hien trong xau p khong, neu co thi tra ve vi tri xuat hien dau tien cua xua "thang"}
    case pos(thang,p) of
      1,6,9: write(' mua xuan ') ;
      11,13,16: write(' mua he');
      19,22,25: write(' mua thu');
      29,33,36: write(' mua dong');
      end;
      readln;
END.

Về Đầu Trang Go down
Xem lý lịch thành viên
nguyenvantho
Tổng Thống


Bài gửi : 376
Age : 28
Đến từ : DHSP HUE
Tổng điêm: : 452
Được cảm ơn: : 29
Tham gia: : 14/01/2009

Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Tue 16 Mar 2010 - 10:27

Hay lắm lúc nào rảnh mình cũng làm rồi post lên cho các bạn

_________________
Làm trai gõ phím bình thiên hạ
Anh hùng click chuột định giang sơn
Về Đầu Trang Go down
Xem lý lịch thành viên
knock2810
Thiếu úy
Thiếu úy


Bài gửi : 43
Tổng điêm: : 79
Được cảm ơn: : 2
Tham gia: : 12/02/2009

Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Wed 17 Mar 2010 - 21:54

mon mọi người post nhìu bài vào nhe, mình thấy mấy bài trong sách bài tập đều là bài khó hết, ai làm được bài nào thì cho mọi người tham khảo với
Về Đầu Trang Go down
Xem lý lịch thành viên
sleepy_horse
Binh nhì
Binh nhì


Bài gửi : 1
Tổng điêm: : 1
Được cảm ơn: : 0
Tham gia: : 17/05/2010

Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Mon 17 May 2010 - 1:26

uh! hay nhỉ
Về Đầu Trang Go down
Xem lý lịch thành viên
godautre
Binh nhì
Binh nhì


Bài gửi : 43
Age : 27
Đến từ : DHSP HUE
Tổng điêm: : 75
Được cảm ơn: : 0
Tham gia: : 27/11/2009

Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Tue 18 May 2010 - 9:08

uhm.duoc do.hi
Về Đầu Trang Go down
Xem lý lịch thành viên https://sites.google.com/site/godautretin/
Sponsored content




Bài gửiTiêu đề: Re: Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11   Today at 16:58

Về Đầu Trang Go down
 
Các bài tập của SÁCH GIÁO KHOA TIN HỌC 11
Xem chủ đề cũ hơn Xem chủ đề mới hơn Về Đầu Trang 
Trang 1 trong tổng số 1 trang

Permissions in this forum:Bạn không có quyền trả lời bài viết
THÔNG TIN CÔNG NGHỆ - GIẢI TRÍ - HỌC TẬP - TIN HỌC! :: HỌC TẬP _ TÀI LIỆU HỌC TẬP :: LẬP TRÌNH PASCAL, C/C++-
Chuyển đến