0

bai tap autocad co ban

Bai tap Pascal co ban

Bai tap Pascal co ban

Tin học

... 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 đờng đi, ghi hai dòng: dòng thứ ghi số cung, dòng ... hai số nguyên không âm R1, S1, R1
  • 18
  • 2,143
  • 12
Bài Tập Excel cơ bản , Nâng Cao

Bài Tập Excel bản , Nâng Cao

Tư liệu khác

... HỆ SỐ CHỨC VỤ TIỀN ĂN TRƯA = 15000 * NGÀY CÔNG PHỤ CẤP GIA ĐÌNH = SỐ CON * 100000 SỐ CON 2 TẠM ỨNG= 300000 MÃ KHEN THƯỞNG A TẠM ỨNG = 200000 MÃ KHEN THƯỞNG ... Loan Như Cúc CHỨC VỤ TP PP KT TQ NV MỨC LƯƠNG 500 450 450 400 350 HSCV BV 300 NGÀY CÔNG MÃ KT SỐ CON TP PP NV KT NV NV BV TQ 26 25 24 25 26 23 20 18 B C D A A C C D 2 PCKV 21500 25000 35000 13000 ... HÀNG BÁN THÁNG 01/2003 STT 10 11 TÊN HÀNG Máy lạnh Tivi Xe Dream II Máy giặt Đầu Video Đầu DVD Computer Printer Scanner Digital Camera Maxtor HDD SỐ LƯNG 12 45 15 20 60 13 15 10 80 ĐƠN GIÁ THUẾ...
  • 16
  • 3,461
  • 74
60 bài tập Pascal cơ bản

60 bài tập Pascal bản

Tư liệu khác

... thức in kết hình Mô tả: CONST Bacmax = 50; TYPE Trang 27 Dathuc = Record Bac: Integer; Heso:Array[0 Bacmax] of Real; End; Program CONG_DA_THUC; Uses Crt; Type dathuc=record bac:integer; heso:array[0 ... Writeln('Phuong trinh co vo so nghiem') Else Writeln('Phuong trinh vo nghiem') Else Writeln('Phuong trinh co mot nghiem: x=',-c/b:4:2) Else Begin d:=b*b-4*a*c; If d=0 then Writeln('Phuong trinh co nghiem ... cua ma tran co gia tri nam [1 5]} Function Count(a:MT;n:integer):integer; Var i,j,kq:integer; Begin kq:=0; For i:=1 to n For j:=1 to n If (a[i,j]>=1) and(a[i,j]
  • 41
  • 1,985
  • 19
Các bài tập java cơ bản phần 1

Các bài tập java bản phần 1

Kỹ thuật lập trình

... n T o hàm constructors cho it ng: o constructor default: constructor tham s , dùng giá tr b ng cho bi n c a i t ng kh i gán o constructor copy: constructor y tham s (s tham s c a constructor ... T o hàm constructors cho it ng: o constructor default: constructor tham s , dùng giá tr m c nh cho bi n c a i t ng kh i gán o constructor copy: constructor y tham s (s tham s c a constructor ... h p l T o hàm constructors cho it ng o Constructor 1: constructor tham s , dùng giá tr ban u cho bi n c a i t ng kh i gán o Constructor 2: constructor y tham s (s tham s c a constructor b...
  • 6
  • 1,783
  • 46
bai tap pascal co ban.doc

bai tap pascal co ban.doc

Tin học

... 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 ... Xoá dòng vị trí trỏ dồn dòng phía lên • Thủ tục TEXTCOLOR(color:Byte): Thiết lập màu cho ký tự Trong color ∈ [0,15] • Thủ tục TEXTBACKGROUND(color:Byte): Thiết lập màu cho hình BÀI TẬP MẪU Bài ... thay đổi suốt chương trình - Cú pháp: CONST = ; hoặc: CONST : = ; Ví dụ: CONSTMax = 100; Name = 'Tran Van Hung'; Continue = FALSE; Logic = ODD(5); {Logic...
  • 144
  • 868
  • 5
61 BÀI TẬP PASCAL CƠ BẢN

61 BÀI TẬP PASCAL BẢN

Cao đẳng - Đại học

... thức in kết hình Mô tả: CONST Bacmax = 50; TYPE Trang 27 Dathuc = Record Bac: Integer; Heso:Array[0 Bacmax] of Real; End; Program CONG_DA_THUC; Uses Crt; Type dathuc=record bac:integer; heso:array[0 ... Writeln('Phuong trinh co vo so nghiem') Else Writeln('Phuong trinh vo nghiem') Else Writeln('Phuong trinh co mot nghiem: x=',-c/b:4:2) Else Begin d:=b*b-4*a*c; If d=0 then Writeln('Phuong trinh co nghiem ... cua ma tran co gia tri nam [1 5]} Function Count(a:MT;n:integer):integer; Var i,j,kq:integer; Begin kq:=0; For i:=1 to n For j:=1 to n If (a[i,j]>=1) and(a[i,j]
  • 41
  • 1,498
  • 4
Hệ thống bài tập PLC cơ bản

Hệ thống bài tập PLC bản

Tự động hóa

... K1 co điê ̣n cấ p điê ̣n cho ̣ng KĐB pha MOTOR cha ̣y trước Sau 10 giây, Cơng tắ c tơ K2 co điê ̣n cấ p điên cho ̣ ̣ng KĐB pha MOTOR cha ̣y sau Sau 05 giây tiế p theo, Cơng tắ c tơ K3 co ... máy trộn hố chất dùng PLC S7-200 + Chế độ auto: Chuyển cơng tắc chế độ sang auto, nhấn nút RUN (ban đầu thùng rỗng tiếp điểm biến trở mở ) –PLC lệnh cấp điện cho P1 bơm liệu vào bình Khi liệu ... 2.Cả động chạy vòng 10s động chạy.Động chạy 5s dừng 5s lặp lại lần động chạy lại lặp lại chu trình ban đầu.Nếu nhấn Stop hệ thống dừng lại Ở chế độ Manu:Nhấn Start Động chạy.Nhấn Stop động dừng động...
  • 10
  • 6,035
  • 45
Bai tap Pascal cơ bản

Bai tap Pascal bản

Tư liệu khác

... thức in kết hình Mô tả: CONST Bacmax = 50; TYPE Trang 27 Dathuc = Record Bac: Integer; Heso:Array[0 Bacmax] of Real; End; Program CONG_DA_THUC; Uses Crt; Type dathuc=record bac:integer; heso:array[0 ... Writeln('Phuong trinh co vo so nghiem') Else Writeln('Phuong trinh vo nghiem') Else Writeln('Phuong trinh co mot nghiem: x=',-c/b:4:2) Else Begin d:=b*b-4*a*c; If d=0 then Writeln('Phuong trinh co nghiem ... cua ma tran co gia tri nam [1 5]} Function Count(a:MT;n:integer):integer; Var i,j,kq:integer; Begin kq:=0; For i:=1 to n For j:=1 to n If (a[i,j]>=1) and(a[i,j]
  • 41
  • 644
  • 2
tổng hợp bài tập C# cơ bản

tổng hợp bài tập C# bản

Kỹ thuật lập trình

... dạng sau : DISCOMFORT INDEX DETERMINATION The dry-bulb temperature today is : 76 The wet-bulb temperature today is : 65 The discomfort index today is 71.4, a pleasant day DISCOMFORT INDEX DETERMINATION ... Câu Một số thời tiết ấm giống số gió lạnh số khó chịu (discomfort index) gọi số nhiệt độ - độ ẩm, định nghĩa : discomf ortIndex = 0.4(dryT emp + wetT emp) + 15 Trong đó, dryTemp - “Nhiệt ... dry-bulb temperature today is : 106 The wet-bulb temperature today is : 90 The discomfort index today is 93.4, very uncomfortable Câu Chỉ số độ ẩm H định nghĩa : H =T +h T nhiệt độ đo ◦ F h số độ...
  • 10
  • 3,632
  • 1
Bài tập pascal cơ bản

Bài tập pascal bản

Kỹ thuật lập trình

... ['0','1','2','3','4','5','6','7','8','9'] then dem2:=dem2+1; end; writeln('Trong xau ',s,' co ',dem1,' nguyen am va co ',dem2,' ki tu so'); readln END Bài 15: Lập trình giải toán cố sau Vừa gà vừa chó ... tính tổng chữ số nó: Lời giải: uses crt; var a:integer;tong:byte; BEGIN clrscr; write('Nhap so co chu so: ');readln(a); tong:= a mod 10; a:=a div 10; tong:=tong+a mod 10; a:=a div 10; tong:=tong+a ... nghiem PT la: ',x1:0:2,' va: ',x2:0:2); end else if d=0 then begin x1:=(-b)/(2*a); writeln('PT co nghiem kep la: ',x1:0:2); end else writeln('PT vo nghiem'); readln END Bài 5: Nhập vào số nguyên...
  • 15
  • 803
  • 5
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 bản đến nâng cao theo chương trình tin học lớp 11 không phân ban

Tin học

... bai3 .dat sang bai3 n.dat : '); Writeln; Assign(f1, 'bai3 .dat'); Reset(f1); Assign(f2, 'bai3 n.dat'); Rewrite(f2); While not Eof(f1) Begin Read(f1,ds1); With ds1 Begin ds2.hoten :=holot+ten; val(copy(lop,1,2),ds2.khoi,c); ... Writeln('Phuong trinh co vo so nghiem') Else Writeln('Phuong trinh vo nghiem') Else Writeln('Phuong trinh co mot nghiem : x=',-c/b : : 2) Else Begin d :=b*b-4*a*c; If d=0 then Writeln('Phuong trinh co nghiem ... số Lớp : chữ viết hoa Prorgam file_banghi; Uses Crt; Type Danhsach1=record holot : string[25]; ten : string[10]; tuoi : 99; lop : string[3]; End; Danhsach2=record hoten : string[35]; tuoi : byte;...
  • 45
  • 14,419
  • 17
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 bản

Tin học

... thức in kết hình Mô tả: CONST Bacmax = 50; TYPE Trang 27 Dathuc = Record Bac: Integer; Heso:Array[0 Bacmax] of Real; End; Program CONG_DA_THUC; Uses Crt; Type dathuc=record bac:integer; heso:array[0 ... Writeln('Phuong trinh co vo so nghiem') Else Writeln('Phuong trinh vo nghiem') Else Writeln('Phuong trinh co mot nghiem: x=',-c/b:4:2) Else Begin d:=b*b-4*a*c; If d=0 then Writeln('Phuong trinh co nghiem ... cua ma tran co gia tri nam [1 5]} Function Count(a:MT;n:integer):integer; Var i,j,kq:integer; Begin kq:=0; For i:=1 to n For j:=1 to n If (a[i,j]>=1) and(a[i,j]
  • 41
  • 1,395
  • 24
Bài tập Pascal cơ bản và hướng dẫn

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

Tin học

... write( 'Co hien so khong (c/k)');readln(tloi); if upcase(tloi)'C' then write('Tam biet') else if length(s1)
  • 14
  • 1,376
  • 4

Xem thêm