... trình một
bảng tính mới được mở ra.Nếu cần
mở 1 bảng tính mới ta nhấp vào nút
lệnh New trên thanh công cụ.
-Nếu bảng tính đã có trên trang
tính ,mở thư mục chứa tệp và nháy
đúp vào biểu tượng...
... a
2
= b
2
+ c
2
.
b
2
= a
2
+ c
2
.
c
2
= a
2
+ b
2
.
2. So n chương trình vào máy theo
Bài thựchànhsố 2 – Tinhọc 11
I. Mục tiêu.
1. Kiến thức.
- Nắm chắc cấu trúc và ... lượng nào?
+ Cần các đại lượng : a b.
- Có các bước xử lí nào để tính
được x?
2. Độc lập so n chương trình và
máy.
- Viết chương trình nhập vào độ dài ba cạnh cuat một tam giác và ...
- Cho chương trình sau:
Program max;
var a, b, max:integer;
Begin
Write(‘nhap vao hai so bat ki’);
readln(a, b);
If max:=a;
If max<b then max:=b;
Writeln(max);
Readln;
...
... trình thực hiện
và kết quả trên màn hình.
- Lệnh sinh ngẫu nhiên giá trị cho
mảng a từ – 299 đến 299 .
- In ra màn hình giá trị của từng
phần tử trong mảng a.
- Cộng các phần tử chia hết ... trình, suy nghĩ
và trả lời.
- Giữ lại chỉ số của phần tử có giá
trị lớn nhất.
- Phép so sánh a[i] <a[j]
- Chuyển thứ tự duyệt từ n-1 vè 1.
3. Theo dõi yêu cầu, suy nghĩ các ... k=’);
readln(k);
s:=0;
For i:=1 to n do
if a[i] mod k=0 then s:=s+a[i];
Write(‘tong can tinh la’,s);
readln;
End.
b – Thêm các lệnh mới vào chương trình nhằm sửa đổi chương trình...
... hiện nhanh nhất.
For j:=1 to i do B[i]:=B[i]+A[j];
3. So n chương trình vào máy, thực
hiện chương trình và thông báo kết
quả.
- Nhận xét về thời gian thực hiện
của chương trình này so với ... a[i]:=a[i+1];
a[i+1]:=t;
End;
Writeln(‘day so sau khi sap xep’);
For i:=1 to n do write(a[i]:7);
Writeln;
readln;
End.
- Yêu cầu: Soan chương trình vào máy, chạy thử với các giá ... Rèn luyện kĩ năng nhận xét, phân tích và đề xuất cách giải
bào toán sao cho chương trình chạy nhanh hơn.
a. Mục tiêu:
- Học sinh biết sử dụng kiểu mảng để lập trình giải một bài toán. Biết...
...
readln(a);
x:=length(a);
p:= ‘’;
For i:=x downto 1 do p:=p+a[i];
Bài thựchànhsố 5
Tin học 11
I. Mục tiêu.
1. Kiến thức.
- Khắc sâu thêm phần kiến thức về lí thuyết kiểu xâu ... đơn vị cho kí tự đọc được.
- Cấu trúc dữ liệu: Dem[‘A’ ’Z’]
- Dùng hàm Upcase().
2. Độc lập so n chương trình vào
máy.
If a=p then write(‘xau la Palidrom’)
else write(‘xau khong la Palidrom’); ... chương trình lên bảng.
- Hỏi: Chương trình sau đây có
1. Quan sát, đọc kĩ đề.
Phải: 123 21 abccba
Không phải: abcdea
2. Quan sát chương trình, suy nghĩ
phân tích để hiểu chương...
... cantdan
Type str 79= string[ 79]
Procedure cantdan(s1:str 79; var s2:str 79) ;
Begin
s2:=copy(s1,2,length(s1) – 1)+s1[1];
End;
Thủ tục cangiua
Proceure cangiua(var s:str 79) ;
var i, n:integer; ... Câu hỏi và bàitập về nhà
- Viết thủ tục chaychu(s,dong) nhận tham số là xâu S gồm không quá 79
kí tự và một biến nguyên Dong. In ra màn hình dòng chữ xác định bởi S
chạy ở dòng Dong. Viết ... Bàithựchànhsố 6
Tin học 11
I. Mục tiêu.
1. Kiến thức.
- Củng cố lại các kiến thức về xâu kí tự, chương trình...
... alone.
4. ‘Did someone ring you an hour ago ?’ Martin said to Susan.
Martin asked Susan__________________________________________________
a. whether anyone rang her an hour ago.
b. if someone had ... resources have largely been used up
b. the sea has not yet been fully exploited
c. the problem that prevent us from using the food, minerals and energy
sources of the sea have already been solved
TEST ... they eat meat.
a. herbivores b. carnivores c. omnivores d.
mammals
9. Sperm whale population are at risk due to hunting.
a. in extinction b. in danger c. on the decrease d. in
fewness
10. These...
... that.
Q"why you said that.
In 9 f:which VVV9place:VVwhere
On 9 f:whichVVV9time:VVwhen
For whichVV9reason:VVwhy
Where và when có thể được ... (defining)
Why thường được dùng trong mệnh đề xác định và thường theo sau a reason hay the reason.
- That is the reason why I didn’t come to the party yesterday.
Where, when và why được gọi là ... Z""Oggggggggggggggggggg.& 9 .(O:
Qggggg.(..<(--&<$+ 9& amp;:
Qgggggggggggggg<<..( 9 :
,...
... thời gian (yesterday, ago,
last ……, in the past, in 199 0)
Ex: - My father bought this house 10 years ago.
- Mr. Nam worked here in 199 9.
b. Diễn tả một loạt các hành động xảy ra liên tiếp ... khác so các từ còn lại:
6. a. invent b. interact c. develop d. control
7. a. violent b. popular c. convenient d. favorite
8. a. benefit b. commerce c. available d. explore
9. a. article b. personal ... please (ask)_______________ me.
29. You (need)_________ to put some petrol in the car if you (take)______________ it.
30. If Lan (not prepare)_____ _____ for the test soon, she (not pass)______________it.
IV....
... 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 ... (100 *124 2)+((skwtt-100)*13 69) ;
Writeln( so tien can tra la:’, tien :12: 1);
End;
If SKWTT>150 then
Begin
tien:= (100 *124 2)+(50)*13 69) + ((skwtt-150)*1836);
Writeln( so tien can tra la:’, tien :12: 1);
End;
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...