Lập trình đơn giản

Cake

Câu 1: Trong Pascal, khai báo nào sau đây là đúng? Giải thích tại sao?

A. Const x: real;

B. Var 4hss: integer;

C. Var Tb: real;

D. Var R= 30;

Câu 2: Hãy xác định bài toán tính chu vi, diện tích hình chữ nhật có chiều dài và chiều rộng nhập từ bàn phím. Mô tả thuật toán và viết chương trình cho bài toán.

duong nguyenvan Hà Ngân Hà Giao Huỳnh và các bạn khác nữa! Giúp mình với! Nếu được, mình sẽ nhờ các bạn của mình tặng GP!

Trương Tú Nhi
23 tháng 11 2017 lúc 21:33

Câu 1 : chon C Var Tb: real; vì vì cách khai báo biến: Var<tên biến>:<kiểu dữ liệu>;

Câu 2 : Tính chu vi, diện tích hình chữ nhật có hai kích thước là a và b:

PROGRAM HINH CHU NHAT;
{Nhap hai kich thuoc a, b cua hinh chu nhat. Tinh chu vi, dien tich cua hinh chu nhat ay}
VAR a,b:real;
BEGIN
Write('Nhap canh a: ');readln(a);
Write('Nhap canh b: ');readln(b);
Writeln;
If (a>0) and (b>0)then
begin
Writeln('Chu vi P = ',2*(a+b):6:2);
Writeln('Dien tich S = ',a*b:6:2);
end
Else writeln(#7,'Khong thuc hien vi a <= 0 hoac b<=0');
Readln

Bình luận (1)
Phạm Thanh Tường
24 tháng 11 2017 lúc 11:11

Bạn Tú Nhi làm đúng rồi đó bạn, nên chắc tôi không cần giải nữa đâu, tham khảo bài bạn ấy đi nhé!

Bình luận (1)
duong nguyenvan
24 tháng 11 2017 lúc 20:55

Bài 2:

*Xác định bài toán :

input : a,b;

output: P(chu vi), S( diện tích);

*Mô tả thuật toán :

B1: S <- a*b;

B2: P <-(a+b)*2;

B3: In và kết thúc.

*Viết chương trình:

Program Chu_Nhat_Program;
Uses Crt;
Var a,b,S,P: real;
Begin
Clrscr;
Write ('Nhap chieu dai ='); readln(a);
Write ('Nhap chieu rong ='); readln(b);
S:=a*b;
P:=(a+b)*2;
Writeln ('Dien tich hinh chua nhat =',S:4:2);

Writeln ('Chu vi hinh chu nhat =',P:4:2);

Readln;

End.

ok

Bình luận (0)
qwerty
25 tháng 11 2017 lúc 19:53

trường mình k học tin 8 đâu chỉ học tin 6, 7 thôi

Bình luận (5)
Thuyết Dương
3 tháng 12 2017 lúc 9:06

Câu 1: chọn ý C. Var Tb:real; vì khai báo biến theo đúng cú pháp

Var <Tên các biến>:<Kiểu dữ liệu>;

Câu 2:

a)Mô tả thuật toán:

InPut: chiều dài, chiều rộng

OutPut: chu vi, diện tích hình chữ nhật

Các bước thực hiện:

Bước 1: Nhập chiều dài x và chiều rộng y

Bước 2: CV <--- (x+y)*2

Bước 3: S<--- x*y

Bước 4: Kết thúc thuật toán.

b)Viết chương trình

program HCN;

uses crt;

var x,y,CV,S : Real;

begin

clrscr;

writeln('Hay nhap chieu dai:');readln(x);

writeln('Hay nhap chieu rong');readln(y);

CV:=(x+y)*2;

writeln('Vay chu vi hinh chu nhat la:',CV);

S:=x*y;

writeln('Vay dien tich hinh chu nhat la:',S);

readln

end.

Bình luận (1)

Các câu hỏi tương tự
Phạm Ngọc My
Xem chi tiết
Lê Thị Hạnh
Xem chi tiết
Trần Minh Anh
Xem chi tiết
Tuấn Đạt Nguyễn
Xem chi tiết
Nguyễn Đăng Khoa
Xem chi tiết
Lê Hùng
Xem chi tiết
Nguyễn Thị Thu Hiền
Xem chi tiết
Kỳ Duyên Võ
Xem chi tiết
Nguyễn Thúy Hằng
Xem chi tiết