0

bai tap co so lap trinh pascal

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

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

Kỹ thuật lập trình

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

Tài liệu khác

... i:=i+1; 4 else i:=i+1;if kt thenwriteln('Day tao thanh cap so cong')elsewriteln(‘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ápCâ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;BeginTam:=x[1];For i:=2 to 4 doIf x[i]<tam...
  • 20
  • 2,162
  • 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 sở dữ liệu

Cơ sở dữ liệu

... 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,639
  • 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 bản chương trình Tin học lớp 11 chương II, chương III - Phạm Anh Tùng

Tin học

... Nhap_xet _so; Var so: integer;BeginWriteln(’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);ReadlnEnd.Phạm ... dẫn:Program xet _so; Var a: word;BeginWriteln(’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’);ReadlnEnd.Bài ... a,b,x:real;BeginWriteln(’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,471
  • 2
bài tập môn Cơ sở lập trình

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

Chuyên ngành kinh tế

... <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!"); elseprintf("\nTong...
  • 22
  • 2,038
  • 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 giải

Kỹ thuật lập trình

... 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,202
  • 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

Kỹ thuật lập trình

... 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 SoMinNhậ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áoGiả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 ... XXXXThuong = XXXXDu = XXXXHướng dẫnNhập :So1 , So2 Xuất: Tong, Hieu, Tich, Thuong,DuGiả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 doBeginWriteln(I+K:2);K:=1;End;d....
  • 38
  • 1,450
  • 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++ code

Điện - Điện tử

... 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
  • 7,964
  • 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 SỞ LẬP TRÌNH (C++)

Cao đẳng - Đại học

... Tô Oai Hùng24 So Sánh switch Với if-elsey 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ùng24Bả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
  • 4,012
  • 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++ code

Kỹ thuật lập trình

... 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,637
  • 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 BẢN_SỐ 1 pptx

Kỹ thuật lập trình

... 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,925
  • 19
Bài tập cơ sở dữ liệu - Bài toán chương trình

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

Cơ sở dữ liệu

... write(out,0;Writeln(out);End;End;End;Close(out);End;BeginClrScr;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 4Var 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}BeginAsign(out,'a:pasparty.out');rewrite(out);For...
  • 7
  • 911
  • 1

Xem thêm