bai tap cau truc lap va re nhanh

Bài 11-Cấu trúc lặp và rẽ nhánh

Bài 11-Cấu trúc lặp và rẽ nhánh

Ngày tải lên : 25/09/2013, 21:10
... thí tính đưa ra nghiệm, ngược lại thông báo phương trỡnh voõ nghieọm. Đ9. CAU TRUC RE NHANH 1. Khaựi nieọm re nhánh Ví dụ: Để viết chương trình giải phương trình bậc hai, ta phải: Tính ... 2 Giáo án tin học lớp 11 CHƯƠNG III CẤU TRÚC RẼ NHÁNH LẶP Tuần : . . . Tieỏt : 11 Đ9. CAU TRUC RE NHANH I. Muùc tiêu 1. Về kiến thức : - Hiểu nhu cầu của cấu trúc rẽ nhánh trong biểu diễn ... Các hệ số a,b,c nhập từ bàn phím. program vidu1; Uses crt; var a,b,c,d,x1,x2:real; begin clrscr; write('Nhap a,b,c:’);readln(a,b,c); d:=b*b−4*a*c; If d<0 then writeln(‘Pt vo Nghiem’) ...
  • 3
  • 1.5K
  • 14
Bài tập cấu trúc dữ liệu

Bài tập cấu trúc dữ liệu

Ngày tải lên : 26/10/2012, 14:08
... push(int value) { if (queue_size < MAX) { queue_size++; queue[rear++] = value; if (rear == MAX) rear = 0; } return rear; } int pop(int *value) { if (queue_size > 0) { *value ... element_type; struct node { element_type element; struct node *next; }; void khoi_tao_ds(struct node **first, struct node **last) { *first = *last = NULL; } void insert(element_type e, struct ... free(first); first = tmp; } } #include <stdio.h> typedef int element_type; struct node { element_type element; struct node *next; }; void khoi_tao_ds(struct node **first, struct...
  • 23
  • 1K
  • 4
BÀI TẬP CẤU TRÚC DỮ LIỆU

BÀI TẬP CẤU TRÚC DỮ LIỆU

Ngày tải lên : 25/04/2013, 20:35
... GOC } Procedure DD(m:node;VAR q: integer; Var A: mang;T:Tree); Var k: node;j:integer; Begin k:=T.parent[m]; j:=0; while k<>parent_T(Root(T),T) do begin a[j]:=k; k:=T.parent[k]; j:=j+1; ... and (retrieve(T,L1)<retrieve(Q,L2)) do T:=T^.next; insert_L(retrieve(Q,L2),T,P); Q:=Q^.next; end; End; { TRON N DANH SACH } Procedure Merger_nl(N_List:mang; m: integer; Var L:List); Var ... SỐ NHỊ PHÂN Type b=0 1; Position=^Cell; Cell=Record bit:0 1; next:Position; end; Procedure INCREMENT(Var Bnumber: Position; Q: Position); Var K,P: position; Begin P:=Bnumber; while P^.next<>Q...
  • 8
  • 680
  • 1
Bài tập về sử dụng lệnh rẽ nhánh

Bài tập về sử dụng lệnh rẽ nhánh

Ngày tải lên : 23/06/2013, 01:26
... ra hàng tháng) Program TienTietKiem; Var s,n:real; Begin Write( ‘Nhap s:’); readln(s); For n:=1 to 12 do S := S + 0.015*S; Write( Tong tien là,S); readln End. Thuật toán B1: Nhập S, N 0 ... chương trình sau thực hiện công việc gì ? Var max, a,b:integer ; Begin write( Nhap a,b ‘); readln(a,b) ; max:=b; if a>b then max:=a; write(max); readln; End. If a > b then write(‘ ... và đưa ra màn hình số nguyên dương nhỏ nhất thoả mÃn điều kiện: = < N 1i i 1 A Write(a); readln(a); S:=0; n:=0; While s <= a do begin n:=n+1; s:=s+1/n; end; writeln(n); ...
  • 13
  • 1.7K
  • 16
bai 10: Cau truc lap

bai 10: Cau truc lap

Ngày tải lên : 09/07/2013, 01:25
  • 17
  • 872
  • 10
BÀi tập câu trực tiếp gián tiếp

BÀi tập câu trực tiếp gián tiếp

Ngày tải lên : 18/08/2013, 09:10
... called” She said ___________________________________________________________ Reported Requests and Orders Change the direct speech into reported speech: 1. “Please help me carry this” She asked me ______________________________________________________ 2. ... Reported Statements Change this direct speech into reported speech: 1. “He works in a bank” She said ___________________________________________________________ 2. ... ___________________________________________________________ 14. “I visited my parents at the weekend” She told me ________________________________________________________ 15. “She hasn’t eaten sushi before” She said ___________________________________________________________ 16....
  • 2
  • 6.8K
  • 297
bài 10 cấu trúc lặp

bài 10 cấu trúc lặp

Ngày tải lên : 05/09/2013, 22:10
... ; Begin Write(‘Nhap vao gia tri N:’) ; Readln(N) ; S := 0 ; For I := 1 to N do S := S + I ; Writeln(‘ Tong S =’ , S ) ; Readln ; End. Write(‘Nhap vao gia tri a :’) ; Readn(a) ; S := 1/a ... ; Writeln(‘ Tong S la : ‘, S :8:2) ; Readln ; End. Program Tong_1b ; Uses crt ; Var S : real ; a,N : integer ; Begin Write(‘Nhap vao gia tri a :’) ; Readn(a) ; S := 1/a ; For N := 100 ... vi từ M ñeán N. Program Vi_du 2 ; Uses crt ; Var M, N, I : integer ; T : longint ; Begin Write(‘Nhap vao 2 gia tri M va N (M < N) :’) ; Readn(M,N) ; T := 0 ; For I := M to N do If...
  • 6
  • 1.3K
  • 23
bai tap cau V-ing va To-V

bai tap cau V-ing va To-V

Ngày tải lên : 06/09/2013, 17:10
  • 2
  • 7K
  • 377
bai tap cau truc tiep

bai tap cau truc tiep

Ngày tải lên : 19/09/2013, 07:10
... 22-“Is there a phone?” I asked her 23-“Do you have a car?” She asked me 24-“Can I move the furniture around?” I asked her 25-“Are there many students?” I asked her 26. ‘Where are you studying?’, ... ) 56. ‘It took me three hours to get here because the roads were very muddy and slippery.’ (He told me ) 57. ‘I think it’s a crazy idea. It won’t work.’ (She said ) 58. ‘Breakfast is served between ... ……………………………………………………………………………………………… 30. Phong said “My parents are very proud of my good marks.” ………………………… ……………………………………………………………………………………………… 31. My teacher said to me “You should read these books.” ………………………… ……………………………………………………………………………………………… ...
  • 9
  • 3.3K
  • 42