Bài tập pascal cơ bản dành cho học sinh mới học

Bài tập pascal cơ bản dành cho hs-sv pps

Bài tập pascal cơ bản dành cho hs-sv pps

... readln END Bài 15: Lập trình giải toán cố sau Vừa gà vừa chó Bó lại cho tròn Ba mưoi sáu Một trăm chân chẵn Lời giải: uses crt; var cho: byte; BEGIN clrscr; for cho: =1 to 25 if 4 *cho+ (36 -cho) *2=100 ... to 25 if 4 *cho+ (36 -cho) *2=100 then writeln('So ga la: ',36 -cho, ' so cho la: ' ,cho) ; readln END Bài 16: Nhập số nguyên dương n
Ngày tải lên : 21/07/2014, 15:20
  • 15
  • 817
  • 16
Bài tập Pascal cơ bản đến nâng cao theo chương trình tin học lớp 11 không phân ban

Bài tập Pascal cơ bản đến nâng cao theo chương trình tin học lớp 11 không phân ban

... ĐT : 0972. 311. 481 Trang 30 Trần Văn Chung trường THPT Hoàng Văn Thụ Nha Trang Bài tập 2: Chương trình nhập danh sách học sinh gồm Họ tên, tuổi, lớp Chương trình in danh sách sau xếp theo thứ tự ... upcase(s[i+1]; Writeln(‘xau sau dieu chinh la’,s); Readln End Bài tập phần ghi, file Bài tập 1: Chương trình nhập danh sách học sinh gồm Họ tên, tuổi, lớp học...
Ngày tải lên : 30/10/2013, 08:49
  • 45
  • 14.4K
  • 17
một số phương pháp cơ bản để chứng minh một bất đẳng thức và khai thác một số bài toán cơ bản dành cho học sinh lớp 10

một số phương pháp cơ bản để chứng minh một bất đẳng thức và khai thác một số bài toán cơ bản dành cho học sinh lớp 10

... Tạo Một số phương pháp để chứng minh bất đẳng thức khai thác số toán dành cho học sinh lớp 10 1 + ≥ a b a+b Chứng minh : Hướng dẫn giải : (Bài toán giải nhiều cách) Cách 1: (sử dụng Bài toán ... c Bài toán 6: Cho a,b, c dương Giáo viên: Lê Thị Thu Huyền - Tổ Toán - Trường THPT Lê Viết Tạo Một số phương pháp để chứng minh...
Ngày tải lên : 15/11/2014, 14:04
  • 16
  • 909
  • 0
ÔN TẬP CƠ BẢN DÀNH CHO HOC SINH 12 CHON KHXH

ÔN TẬP CƠ BẢN DÀNH CHO HOC SINH 12 CHON KHXH

... phat quang Cõu 11 Chon phat biờu sai noi vờ c iờm c trng cua tia Laze: A La mụt chum sang kờt hp B Co tinh n sc cao D Tinh n sc cao C Co cng ụ rõt ln D La mụt chum sang hụi tu Cõu 12 Trang thai ... D triti Cõu 32 Cho phn ng ht nhõn X + X He + n X l ht A Proton B ntron C dteri D triti Cõu 33 Cho phn ng ht nhõn H + Be He + X X l ht nhõn A teri B triti C.liti D hờli Cõu 34 Cho phn ng...
Ngày tải lên : 09/04/2017, 19:47
  • 6
  • 410
  • 0
Bai tap Pascal co ban

Bai tap Pascal co ban

... Khong co - 14 Lê Ngọc Thắng hop_thu_cua_bodie_37@yahoo.com Bài tập Tập I Ví dụ với file INP.TXT 31 27 27 26 22 12 20 file OUT.TXT 3 Với file INP.TXT 1 29 29 26 19 12 20 file OUT3.TXT Khong co ... ghi file OUT.BL nh sau: -7 Lê Ngọc Thắng hop_thu_cua_bodie_37@yahoo.com Bài tập Tập I - Nếu đờng đi, ghi dòng chữ KHONG CO DUONG DI, - Nếu có đờng đi, ghi hai dòng: dòng thứ ghi số cung, dòng ....
Ngày tải lên : 24/06/2013, 01:28
  • 18
  • 2.1K
  • 12
60 bài tập Pascal cơ bản

60 bài tập Pascal cơ bản

... giay: ');readln(x); gio:= x div 3600 ; x:=x mod 3600 ; phut:=x div 60; x:=x mod 60; Writeln('Ket qua = ', gio,'gio : ', phut, 'phut : ', x, 'giay'); Readln; End Bài 11: Nhập vào tâm bán kính đường ... While not eof(f) Begin read(f,i); write(i:3); End; Readln; End Bài 60: Mở file số nguyên có đĩa, chép nội dung sang tập tin in nội dung tập tin sau chép hình Program COPY_FILE; Trang...
Ngày tải lên : 26/07/2013, 01:27
  • 41
  • 2K
  • 19
bai tap pascal co ban.doc

bai tap pascal co ban.doc

... chấm phẩy (;) 1.2 Lệnh CASE Cú pháp: Dạng CASE B OF Const 1: S1; Const 2: S2; Const n: Sn; END; Dạng CASE B OF Const 1: S1; Const 2: S2; Const n: Sn; ELSE Sn+1; END; Trong đó:  B: Biểu thức ... tên BAI1 .PAS Thoát khỏi Pascal Khởi động lại Turbo Pascal Mở file BAI1 .PAS Chèn thêm vào dòng: CLRSCR; vào sau dòng BEGIN Dịch chạy thử chương trình 10 Lưu chương trình vào đĩa 11 Thoát khỏi...
Ngày tải lên : 26/08/2013, 00:10
  • 144
  • 868
  • 5
61 BÀI TẬP PASCAL CƠ BẢN

61 BÀI TẬP PASCAL CƠ BẢN

... ');readln(k); Writeln('C(',n,',',k,') = ',c(n,k):6:0); Readln; End Bài 29: Lập tam giác PASCAL, Cn k(dùng chương trình con) n Program TAM_GIAC _PASCAL; Uses Crt; Var i,j,n,k:integer; Trang 12 Function gt(n:integer):longint; ... While not eof(f) Begin read(f,i); write(i:3); End; Readln; End Bài 60: Mở file số nguyên có đĩa, chép nội dung sang tập tin in nội dung tập tin sau chép hình...
Ngày tải lên : 28/08/2013, 08:00
  • 41
  • 1.5K
  • 4
Bai tap Pascal cơ bản

Bai tap Pascal cơ bản

... Writeln('C(',n,',',k,') = ',c(n,k):6:0); Readln; End Bài 29: Lập tam giác PASCAL, Cn k(dùng chương trình con) n Program TAM_GIAC _PASCAL; Uses Crt; Var i,j,n,k:integer; Trang 12 Function gt(n:integer):longint; ... ((5*td+3*tn+tg/3=100)and (td+tn+tg=100)) then Writeln(td:6, tn:12, tg:15); Readln; End Trang Bài 23: Tạo bảng số dạng sau: 10 11 12 13 14 15 16 17 18 19 Program BANG_SO; Uses crt;...
Ngày tải lên : 10/10/2013, 04:11
  • 41
  • 644
  • 2
Bài tập pascal cơ bản

Bài tập pascal cơ bản

... Tương tự với xếp với dãy giảm dần Bài 28: Cho dãy số a1, ,an; b1, ,bm xếp theo thứ tự tăng dần Lập trình để từ dãy xây dựng dãy theo thứ tự tăng dần Lời giải: Bài 29: Nhập số nguyên dương n dãy ... can'); if (a*a=b*b+c*c) or (b*b=a*a+c*c) or (c*c=b*b+a*a)then writeln('Tam giac vuong'); readln END Bài 4: Lập trình giải phương trình bậc 2: Lời giải: uses crt; var a,b,c,x1,x2,d:real; BEGIN...
Ngày tải lên : 23/10/2013, 20:15
  • 15
  • 803
  • 5
Bài soạn Những bài tập Pascal cơ bản

Bài soạn Những bài tập Pascal cơ bản

... ');readln(k); Writeln('C(',n,',',k,') = ',c(n,k):6:0); Readln; End Bài 29: Lập tam giác PASCAL, Cn k(dùng chương trình con) n Program TAM_GIAC _PASCAL; Uses Crt; Var i,j,n,k:integer; Trang 12 Function gt(n:integer):longint; ... While not eof(f) Begin read(f,i); write(i:3); End; Readln; End Bài 60: Mở file số nguyên có đĩa, chép nội dung sang tập tin in nội dung tập tin sau chép hình...
Ngày tải lên : 24/11/2013, 09:11
  • 41
  • 1.4K
  • 24
Cách giải các phương trình cơ bản danh cho học sinh lớp 8 12

Cách giải các phương trình cơ bản danh cho học sinh lớp 8 12

... có hai phương trình để giải hai ẩn Từ phương trình toán ta có phương trình 2a + 5b − 12 = Ngoài phương trình ta có phương trình khác tạo mối liên hệ a b Đó b2 − a3 = Vậy ta có hệ phương trình ... 33 ; 4 Phương trình tựa đối xứng Là phương trình có dạng ax + bx3 + cx − bx + a = x Để giải phương trình ta chia hai vế cho x đặt t = x − , ta phương tr...
Ngày tải lên : 06/12/2013, 07:27
  • 24
  • 1.4K
  • 0
Bài tập Pascal cơ bản và hướng dẫn

Bài tập Pascal cơ bản và hướng dẫn

... readln; end VCT tìm ước chung lớn bội chung nhỏ hai số nhập vào từ bàn phím? var a,b,min,max,ucln:integer; begin write('moi nhap hai so can xac dinh: '); readln(a,b); ... a[i]:=a[j]; a[j]:=tam; end; for i:=1 to n writeln(a[i]); readln; end VCT đọc số có chữ số nhập vào từ bàn phím? uses crt; Var s:array[1 9] of string; a,b,c,n:integer; begin clrscr; repeat write('nhap ... inc(n); delete(s,i,1...
Ngày tải lên : 26/12/2013, 20:00
  • 14
  • 1.4K
  • 4

Xem thêm

Từ khóa: