Bài tập biến và hằng

Bài Tập Thực Hành.

Bài 1: Viết chương trình tính (20+2)^2/3+1.

Bài 2: Viết chương trình tính chu vi, diện tích hình tròn có bán kính = 5.

Gợi ý: Var cv: real;
dt:real;

Const bk=5;
Pi=3.14;
Begin
Cv:=bk*2*3.14;
dt:=bk*bk*3.14;
Writeln(‘chu vi hinh tron co ban kinh =5 la’,cv:5:2);

Bài 4: Viết chương trình tính chu vi, diện tích hình chữ nhật có chiều dài =10, chiều rộng =3.

Var cv:real;
Const cd =10;
Cr=3;
Begin
Cv:=(cd+cr)*2;
DT:=cr*cd;

Bài 5: Viết chương trình tính chu vi, diện tích hình tròn có bán kính do người dùng nhập vào.

Bài 6: Nhập vào 2 số nguyên A,B tính tổng 2 số nguyên.

Bài 7: Nhập họ và tên, năm sinh in ra số tuổi.

Var namsinh,tuoi:integer;
HoTen:string;
begin
writeln(‘ho va ten’); readln(HoTen);
writeln(‘nhap vao nam sinh’); readln(namsinh);
tuoi:=2011- namsinh;

Bài 8: Viết chương tình tính điểm trung bình của Toán, Lý, Hóa.

Bài 9: Viết chương trình tính tổng bình phương của 2 số nguyên, 2 số nguyên được nhập từ bàn phím.

Bài 10: Viết chương trình nhập vào số nguyên N, in ra màn hình số đó có chia hết cho 2 hay không ?
Bài 11: Viết chương trình nhập vào số nguyên N, in ra màn hình số đó có chia hết cho 2,4,5 hay không?