-
Hướng dẫn làm bài tập và thực hành 2
Khởi động Turbo Pascal: Nhấp chuột lên biểu tượng Pascal trên màn hình hoặc lên tệp Turbo.exe trong thư mục BIN của thư mục TP ở ổ đĩa C hoặc ổ đĩa D.
-
Bài tập và thực hành 2 trang 49 SGK Tin học 11
Xây dựng chương trình có sử dụng cấu trúc rẽ nhánh; Làm quen với việc hiệu chỉnh chương trình.
-
Câu 1 trang 50 SGK Tin học 11
Hãy cho biết sự giống và khác nhau của hai dạng câu lệnh if - then.
-
Câu 2 trang 50 SGK Tin học 11
Câu lệnh ghép là gì? Tại sao phải có câu lệnh ghép?
-
Câu 3 trang 51 SGK Tin học 11
Có thể dùng câu lệnh while-đo để thay cho câu lệnh for-do được không? Nếu được, hãy thực hiện điều đỏ với chương trình.
-
Câu 6 trang 51 SGK Tin học 11
Lập trình để giải bài toán cổ sau:
-
Câu 7 trang 51 SGK Tin học 11
Nhập từ bàn phím tuổi của cha và con [tuổi của cha hơn tuổi con ít nhất là 25]. Đưa ra màn hình bao nhiêu năm nữa thì tuổi cha gấp đôi tuổi con.
-
Câu 8 trang 51 SGK Tin học 11
Một người gửi tiết kiệm không kì hạn với số tiền A đồng với lãi suất 0,2% mỗi tháng. Hỏi sau bao nhiêu tháng, người đó rút tiền thì sẽ nhận được số tiền là bao nhiêu. Biết rằng tiền gửi tiết kiệm không ki hạn không được tính cộng vào vốn.
-
Câu 5 trang 51 SGK Tin học 11
Lập trình tính:
-
Câu 4 trang 51 SGK Tin học 11
Viết câu lệnh rẽ nhánh tính:
- Trang chủ
- Lớp 12
- Lớp 11
- Lớp 10
- Lớp 9
- Lớp 8
- Lớp 7
- Lớp 6
- Lớp 5
- Lớp 4
- Lớp 3
- Lớp 2
- Lớp 1
Lập trình tính:
Đề bài
Lập trình tính:
Lời giải chi tiết
a] program Tong_5a,
uses crt,
var y: real;
n: byte;
Begin
clrscr
y : 0;
for n :=1 to 50 do
y : = y + n / [ n +1 ] ;
writeln['Tong y la: y:0:18];
readln ;
End.
Nếu biến y khai báo theo kiểu extended thì chương trình tính tổng y sẽ là như sau:
[$e+, N+}
program Tong_5a;
uses crt;
var y: real;
n :byte;
Begin clrscr;
y : = 0 ;
for n:= 1 to 50 do
y:= y + n/[n+1];
writeln['Tong y la: y:0:18];
readln
End.
b]
program Tong_5b;
uses crt;
var n: longint;
e, sh: real;
Begin
clrscr;
sh:= 1/2,
n: = 2 ;
e:= 2 + sh;
while sh>= 2*1E-16 do
begin
inc [n] ,
sh: = sh*[1/n] ,
e:= e + sh;
end;
writeln['Gia tri e[n]la: ',e:10:6];
readln
End.
Loigiaihay.com