Phần lý thuyết ôn thi HKII Tin hoc 8 (2014 - 2015)
ĐỀ CƯƠNG ÔN THI HKII MÔN TIN HỌC 8
A) Phần lý thuyết: (6 điểm)
1) Lệnh lặp For:
a) Cú pháp và giải thích:
For := To Do ;
Trong đó:
- For, To, Do là các từ khoá.
- “Biến đếm”. “Giá trị đầu” và “Giá trị cuối” là các giá trị nguyên....
lap trinh pascal.giup voj
nhap vao mot so nguyen n.in ra uoc so nguyen to cua n
...
V-Pascal 2.10 lập trình Pascal cho người Việt
Lập trình Pascal là một môn học có thể tạo cho học sinh tính tư duy sáng tạo và tinh thần làm việc độc lập cao; tuy nhiên chỉ với các phiên bản nền Dos (như Turbo, Borland hay FreePascal) với cách tương tác phức tạp và giao diện đồ họa quá giản đơn như hiện nay đã làm cho Pascal trở nên quá khó khăn và xa lạ đối với người sử dụng và nhất là đối với học sinh THCS, THPT, sinh viên các ngành khoa học tự...
Pascal Study 1.00: Học Pascal từ cơ bản đến nâng cao
Xin giới thiệu với các bạn phần mềm học Pascal từ cơ bản đến nâng cao chỉ với dung lượng 20MB. Địa chỉ tải: .html hay .
Giao diện chính của chương trình như sau:
Phần 1: Là nơi để bạn bước đầu làm quen với các kiểu dữ liệu, khai báo hằng, biến và các câu lệnh cơ bản, bạn cần xem kỹ phần này thì mới có thể làm được những bài tập ở phần 2.
Phần 2: Bài tập ở rất nhiều dạng khác nhau,... Viết chương trình in ra thời khóa biểu có dạng sau:
Viết chương trình in ra thời khóa biểu có dạng sau:
2x1=2 3x1=3 ...... 9x1=9
2x2=4 3x2=6 ...... 9x2=18
2x3=6 3x3=9 ...... 9x3=27
2x4=8 3x4=12 ...... 9x4=36
2x5=10 3x5=15 ..... 9x5=45
2x6=12 3x6=18 ..... 9x6=54... Chương trình tính tổn s=1+1/2+1/3..+1/n (c 2)
Var S:string;
i,n:byte;
begin
s:=0;
write(' Enter n=');readln(n);
for i:=1 to n do s:=s+1/i;
write('s=',s:5:2);
end.
2. Chương trình s=1^2+2^+....n^2
var S:integer;
n,i:byte;
begin
write('Enter n=');readln(n);
s:=0;
for i:=1 to n do s:=s+i*i;
write('S=',s:4:2);
reanln;
end.
sưu tầm... 1. Chương trình tính tổn s=1+1/2+1/3..+1/n
Var S:real;
i,n:integer;
begin
s:=0;
write(' Enter n=');readln(n);
for i:=1 to n do s:=s+1/i;
write('s=',s:5:2);
end.
2. Chương trình s=1^2+2^+....n^2
var S:real;
n,i:integer;
begin
write('Enter n=');readln(n);
s:=0;
for i:=1 to n do s:=s+i*i;
write('S=',s:4:2);
reanln;
end.
sưu tầm... Ôn Pascal 11
Bài 3 Chương trình tổng các bình phương cac số nguyên chẳn từ 1 đến 50
program Bai3;
uses crt;
var
S,i : Integer;
begin
clrscr;
Writeln(’——————–Truong THPT Thai Phien—————-’);
Writeln(’—————On tap mo tin hoc 11- hoc ki 1————–’);
Writeln(’Chuong trinh tinh tong cac binh phuong so chan tu 1 den 50′);
Writeln(’————————’);
S:=0;
for i:=1to 50 do
if(i mod 2=0) then
begin
S:=S+i*i;
end;
Writeln(’Tong so la :’,S);
readln;
end.
Bài 4:Chương trình tìm số lớn nhất trong 3 số.
program Baitap5;
uses crt;
var
a,b,c,max : integer;
begin
... Bài tập bổ sung về Pascal.
Viết chương trình nhập vào một số nguyên dương từ bàn phím. In ra màn hình cách viết triển khai của số đó trong hệ cơ số 10.
Ví dụ:
Số nhập In ra
175 ... Một số bài tập Pascal
Bài tập 1:
Viết chương trình nhập vào độ dài hai cạnh của tam giác và góc giữa hai cạnh đó, sau đó tính và in ra màn hình diện tích của tam giác
Ý tưởng:
Công thức tính diện tích tam giác: S = a*b*sin(x)/2 với a,b là độ dài 2 cạnh và x là góc kẹp giữa 2 cạnh a và b.
:xarbeit01:
Chuơng trình
Code:
Program Tinh_dien_tich_tam_giac;
Var a,b,x,dientich: Real;
Begin
Write('Nhap vao do dai canh thu nhat: '); Readln(a);
...
Các ý kiến mới nhất