Bài 1: Bác nông dân có miếng đất hình chữ nhật có chiều dài là a, chiều rộng là b (cạnh đo bằng đơn vị mét). Bác nông dân cần rào bằng lưới mắt cáo xung quanh miếng đất. Em hãy viết chương trình giúp bác nông dân tính được số mét lưới cần để rào và diện tích miếng đất? ►Xác định bài toán Input: …………………………………………………………………………… Output:………………………………………………………………………….. ►Viết chương trình bằng NNLT Pascal Uses crt; Var ………………………………….; Begin Clrscr; Write(‘Nhap ..….: ’); Readln(…); ……………………………………………………. Readln; End.

2 câu trả lời

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

- Input : chiều dài a, chiều rộng b

- Output : số mét lướt cần rào và diện tích miếng đất

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

uses crt;

var a, b, s, c : real;

begin

clrscr;

write('nhap chieu dai :');readln(a);

write('nhap chieu rong :');readln(b);

c := (a + b) * 2;

s := a * b;

writeln('so met luot can de rao la :', c :3:2);

writeln('dien tich mien dat la :', s:3:2);

readln;

end.

►Xác định bài toán

input: chiều dài, chiều rộng(a,b)

output: số mét lưới cần để rào và diện tích đất(c,s)

►Viết chương trình bằng NNLT Pascal

uses crt;

var a,b,cv,s: real;

begin

clrscr;

write('nhap a: ');        readln(a);

write('nhap a: ');         readln(b);

cv:=(a+b)*2;

s:=a*b;

writeln('met luoi can de rao la: ',cv:1:2);

writeln('dien tich la: ',s:1:2);

readln;

end.