bai tap co so lap trinh pascal

Bài giảng Cơ sở lập trình pptx

Bài giảng Cơ sở lập trình pptx

Ngày tải lên : 27/06/2014, 03:20
... tiên, ví d: txtWelcome. 5. Viết code 5.1. Viết code cho nút lệnh btnDisplay Ta m ca s so n tho Code Editor bng cách kt vào nút Display. Trong ca s Code, C# n ... sang kiểu Convert.ToBoolean(Giatri) Boolean Convert.ToByte(Giatri) Byte Convert.ToDateTime(Giatri) Date Convert.ToDouble(Giatri) Double Convert.ToInt16(Giatri) Integer  2 byte Convert.ToInt32(Giatri) ... s Solution Explorer hai thành phn hay dùng là View Code và View Designer. View Code: tác dng hin th ca s so n tho mã lc chn. Ngoài  hin th ca s so n...
  • 108
  • 450
  • 3
bài tập trắc nghiệm lập trình pascal

bài tập trắc nghiệm lập trình pascal

Ngày tải lên : 25/07/2014, 10:58
... i:=i+1; 4 else i:=i+1; if kt then writeln('Day tao thanh cap so cong') else writeln(‘Day khong tao thanh cap so cong'); readln; End. Chọn câu trả lời đúng: A. chương trình báo ... báo lỗi ngữ pháp Câu 20: Cho khai báo sau trong ngôn ngữ Pascal: TYPE a=record Hoten:array[0 40] of char; Tuoi:integer END; Pt=^b; b=RECORD info:a; last:pt; next:pt; END; VAR p1,p2:pt; x:a; ... báo lỗi runtime. 9. Xét chương trình sau: type chi _so= 1 4; MI=array[chi _so] of byte; Var i:byte; X: mi; Function Min(x:Mi):byte; Var i:chi _so; tam:byte; Begin Tam:=x[1]; For i:=2 to 4 do If x[i]<tam...
  • 20
  • 2.2K
  • 2
Bài tập thực hành lập trình cơ sở dữ liệu

Bài tập thực hành lập trình cơ sở dữ liệu

Ngày tải lên : 17/09/2012, 10:03
... phải lên Form, ContextMenu sẽ hiện ra (xem hình). Xử lý các sự kiện trên ContextMenu tương tự như trên MenuStrip “Màu sắc” đã mô tả. Bài 2: Viết chương trình tạo 1 Form chứa control TreeView...
  • 4
  • 5.6K
  • 32
Sáng kiến kinh nghiệm: Hướng dẫn lập trình giải một số dạng bài tập cơ bản chương trình Tin học lớp 11 chương II, chương III - Phạm Anh Tùng

Sáng kiến kinh nghiệm: Hướng dẫn lập trình giải một số dạng bài tập cơ bản chương trình Tin học lớp 11 chương II, chương III - Phạm Anh Tùng

Ngày tải lên : 14/05/2014, 23:08
... Nhap_xet _so; Var so: integer; Begin Writeln(’moi vao mot so nguyen khac 0:’); Readln (so) ; If so < 0 then writeln(’ so ba vua nhap la so am’); If so > 0 then writeln(’ so ban vua nhap la so duong); Readln End. Phạm ... dẫn: Program xet _so; Var a: word; Begin Writeln(’moi nhap vao mot so nguyen duong:’); Readln(a); If a mod 2 = 0 then writeln( so ban vua nhap la so chan’) Else writeln( so ban vua nhap la so le’); Readln End. Bài ... a,b,x:real; Begin Writeln(’moi nhap vao hai so a va b:’); Readln(a,b); If ((a=0) and (b=0)) then writeln(’phuong trinh bac nhat co vo so nghiem’); If ((a=0) and (b<>0)) then writeln(’phuong trinh bac nhat vo...
  • 22
  • 1.5K
  • 2
bài tập môn Cơ sở lập trình

bài tập môn Cơ sở lập trình

Ngày tải lên : 08/08/2014, 16:02
... <conio.h> void timmax (float *a, int n, int k) {float *max = k; for (int i = 1; i<=n; i++) { if (*max < *(a+i)) *max = *(a+i); } if (*max==k) printf (" trong day khong co so ... b. BG: #include <stdio.h> #include <conio.h> main () 13 printf ("\nTich cac phan tu cua mang la: %f", tich); printf ("\n co %d so 0 trong mang a vua nhap", dem0); if ... tu cua mang la: %f", tong); printf ("\n co %d so 0 trong mang a vua nhap", dem0); if (demduong==0) printf ("\nMang khong co phan tu duong nao ca!"); else printf("\nTong...
  • 22
  • 2K
  • 37
Bài tập ngôn ngữ lập trình C có giải

Bài tập ngôn ngữ lập trình C có giải

Ngày tải lên : 17/08/2012, 10:40
... nhac:";cin>>n; for(i=0;i<n;i++) { cd[i].nhap(); } max=cd[1].soluongbai; cout<<"\nCD co so luong bai lon nhat la:"; for(i=0;i<n;i++) { if(cd[i].soluongbai>max) { max=cd[i].soluongbai; cd[i].xuat(); } } getch(); Mai ... luong bai& quot;;cin>>soluongbai; cout<<"Gia tien";cin>>giatien; } void xuat() { cout<<"\nTen dia:"<<tendia; cout<<"\nSo luong bai: "<<soluongbai; cout<<"\nGia ... sohop; public: void nhap() { thucpham::nhap(); cout<<" ;so hop: ";cin>>sohop; } void xuat() { thucpham::xuat(); cout<<"\nSo hop:"<<sohop; cout<<"\n"; } }; Mai...
  • 13
  • 16.2K
  • 127
Tài liệu BÀI ÔN TẬP NGÔN NGỮ LẬP TRÌNH PASCAL. doc

Tài liệu BÀI ÔN TẬP NGÔN NGỮ LẬP TRÌNH PASCAL. doc

Ngày tải lên : 12/12/2013, 15:15
... cho SoMin Nhập Số (thứ hai) Nếu So > SoMax thì gán So cho SoMax Nếu So < SoMin thì gán So cho SoMin Nhập số (thứ ba) Nếu So > SoMax thì gán So cho SoMax Nếu So < SoMin thì gán So ... ‘(‘,ThuaSo,’^’,SoMu,’)’. (* Lấy ThuaSo kế tiếp *) 23 Nhập: so1 ,so2 ,so3 Xuất: Thông báo Giải thuật: 1. Nhập so1 , so2 , so3 2. Nếu so1 +so2 > ;so3 và so2 +so3 > ;so1 và so3 +so1 > ;so2 3. Hiển thị “Đó là tam ... XXXX Thuong = XXXX Du = XXXX Hướng dẫn Nhập :So1 , So2 Xuất: Tong, Hieu, Tich, Thuong,Du Giải thuật: 1. Nhập: So1 , So2 2. Tính Tong = So1 +So2 Hieu = So1 -So2 Tich = So1 *So2 8 c. K:=5; For I:=-2 to 3 do Begin Writeln(I+K:2); K:=1; End; d....
  • 38
  • 1.5K
  • 19
Bài tập ngôn ngữ lập trình C/C++ có code

Bài tập ngôn ngữ lập trình C/C++ có code

Ngày tải lên : 24/03/2014, 22:51
... thiet lap tu hai tham so complex(double r=0, double i=0) : re(r), im(i) {} //hàm tao copy tu mot so phuc complex(const complex &c) : re(c.re), im(c.im) {} public: complex operator+ (complex ... this->im+c.im); } complex complex::operator-(complex c) { return complex(this->re-c.re, this->im-c.im); } complex complex::operator*(complex c) { return complex((this->re*c.re)-(this->im*c.im),(this- >re*c.im)+(c.re*this->im)); ... (<<) SOLUTION 2: #include <iostream.h> #include <conio.h> class complex { private: float real,image; public: complex(float r=0,float i=0); complex operator+(complex c); complex...
  • 80
  • 8K
  • 7
Giáo án - Bài giảng: BÀI GIẢNG MÔN CƠ SỞ LẬP TRÌNH (C++)

Giáo án - Bài giảng: BÀI GIẢNG MÔN CƠ SỞ LẬP TRÌNH (C++)

Ngày tải lên : 16/04/2014, 15:33
... Tô Oai Hùng 24 So Sánh switch Với if-else y Khi sử dụng lệnh if-else lồng nhau thì: - Nếu chọn mục đầu tiên, cần 1 phép so sánh. - … - Nếu chọn mục cuối cùng, cần 12 phép so sánh. y Khi ... hiện. Cơ Sở Lập Trình ThS.GVC Tô Oai Hùng 24 Bảo Trì cout << "Nhập bán kính quả cầu: "; double radius; cin >> radius; cout << "Nhập tỷ trọng quả cầu: "; double ... một hay nhiều các trường hợpcódạng: case ConstantValue: Mỗi case_list là một hay nhiều các trường hợpcódạng: case ConstantValue: Mỗi statement_list đượckếtthúcbằng ...
  • 227
  • 4K
  • 6
Bài tập ngôn ngữ lập trình CC++ có code

Bài tập ngôn ngữ lập trình CC++ có code

Ngày tải lên : 16/06/2014, 00:16
... m=6&3; cout<<m<<endl; cout<<" ;So so chan la: "<<d2<<endl <<" ;So so le la: "<<1000-d2<<endl <<" ;So so chia het ... d2++; if((a[i]&7)==0) d8++; } cout<<" ;so so chan la: "<<d2 <<"\nso so le la: "<<n-d2 <<"\nso so chia het cho 8 la: "<<d8<<endl; ... if(d<0) cout<<"Phuong trinh vo nghiem."; if(d==0) cout<<"Phuong trinh co nghiem kep:x1=x2="<<b/a; if(d>0) { d=sqrt(d); cout<<"Phuong trinh...
  • 17
  • 1.6K
  • 5
BÀI TẬP THỰC HÀNH LẬP TRÌNH C CƠ BẢN_SỐ 1 pptx

BÀI TẬP THỰC HÀNH LẬP TRÌNH C CƠ BẢN_SỐ 1 pptx

Ngày tải lên : 09/07/2014, 08:20
... tháng, hệ số phụ cấp - Xuất ra màn hình những thông tin sau: Ong/Ba: ? So ngay lam viec trong thang: ? He so phu cap: ? So tien duoc nhan: ? Công thức tính số tiền được nhận là: Số ngày làm...
  • 3
  • 2.9K
  • 19
Bài tập cơ sở dữ liệu - Bài toán chương trình"Đường lên đỉnh olimpia" pdf

Bài tập cơ sở dữ liệu - Bài toán chương trình"Đường lên đỉnh olimpia" pdf

Ngày tải lên : 29/07/2014, 09:21
... write(out,0; Writeln(out); End; End; End; Close(out); End; Begin ClrScr; Writeln('Chuong trinh bat daú); ReadData; Solve; Các bạn tự lập chương trình giải bài toán 1 vớin,m và trạng thái ban đầu của ... chương trình Pascal đầy đủ như sau: Program Party; Uses Crt; Type t= Set Of 1 4 Var c,i1,i2,i3,i4,j,k,m,n:integer; On,off,s:T; X:Array [ 1 50 ] Of Integer; Writeln('Chuong trinh ket thuc'); Readln. End. ... Integer; Writeln('Chuong trinh ket thuc'); Readln. End. End; Close(inp); End; Procedure Solve {Thu tuc tim cac trang thai N den thoa man} Begin Asign(out,'a:pasparty.out');rewrite(out); For...
  • 7
  • 911
  • 1

Xem thêm