Ôn tập cuối năm

Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Thanh Vân

Vụ đông xuân năm 2023 , các hộ gia đình xóm 3 và xóm 6 của hợp tác xã Diễn Thành cùng triển khai sản xuất giống lúa ST25 ( giả sử số hộ gia đình xóm 3 và xóm 6 như nhau ) em hãy viết chương trình nhập vào sản lượng thu hoạch lúa của mỗi xóm theo hộ gia đình và in ra màn hình sản lượng thu hoạch lúa chênh lệch giữa mỗi hộ gia đình ở xóm 3 đó , mỗi hộ gia đình tương ứng ở xóm 6

Đinh Quốc Huy
11 tháng 5 2023 lúc 7:31

program TinhSanLuongLua;
var
num_households, i: integer;
xom3_harvest, xom6_harvest: array[1…100] of real;
xom3_total, xom6_total, xom3_avg, xom6_avg: real;
begin
// Nhập vào số lượng hộ gia đình ở xóm 3 và xóm 6
write('Nhap so luong ho gia dinh o xom 3 va xom 6: ');
readln(num_households);

// Nhập vào sản lượng thu hoạch lúa của từng hộ gia đình ở xóm 3
writeln('Nhap san luong thu hoach lua cua tung ho gia dinh o xom 3:');
for i := 1 to num_households do
begin
write('San luong thu hoach lua cua ho gia dinh ', i, ': ');
readln(xom3_harvest[i]);
end;

// Nhập vào sản lượng thu hoạch lúa của từng hộ gia đình ở xóm 6
writeln('Nhap san luong thu hoach lua cua tung ho gia dinh o xom 6:');
for i := 1 to num_households do
begin
write('San luong thu hoach lua cua ho gia dinh ', i, ': ');
readln(xom6_harvest[i]);
end;

// Tính tổng sản lượng thu hoạch lúa của từng xóm
xom3_total := 0;
xom6_total := 0;
for i := 1 to num_households do
begin
xom3_total := xom3_total + xom3_harvest[i];
xom6_total := xom6_total + xom6_harvest[i];
end;

// Tính sản lượng thu hoạch lúa trung bình của mỗi hộ gia đình ở từng xóm
xom3_avg := xom3_total / num_households;
xom6_avg := xom6_total / num_households;

// In ra màn hình sản lượng thu hoạch lúa trung bình của mỗi hộ gia đình ở từng xóm
writeln('San luong thu hoach lua trung binh cua moi ho gia dinh o xom 3 la: ', xom3_avg:0:2);
writeln('San luong thu hoach lua trung binh cua moi ho gia dinh o xom 6 la: ', xom6_avg:0:2);

Bạn tham khảo

 

Nguyễn Hoàng Duy
11 tháng 5 2023 lúc 22:32

program TinhSanLuongLua;
const
  SoHoGiaDinh = 5;

var SanLuongXom3: array[1..SoHoGiaDinh] of Integer;
      SanLuongXom6: array[1..SoHoGiaDinh] of Integer;
       i: Integer;
  begin
  writeln('Nhap vao san luong thu hoach lua cua moi ho gia dinh o xom 3:');
  for i := 1 to SoHoGiaDinh do
  begin
    write('Ho gia dinh ', i, ': ');
    readln(SanLuongXom3[i]);
  end;
  writeln('Nhap vao san luong thu hoach lua cua moi ho gia dinh o xom 6:');
  for i := 1 to SoHoGiaDinh do
  begin
    write('Ho gia dinh ', i, ': ');
    readln(SanLuongXom6[i]);
  end;
  writeln('Chenh lech san luong thu hoach lua cua moi ho gia dinh o xom 3:');
  for i := 1 to SoHoGiaDinh do
  begin
    writeln('Ho gia dinh ', i, ': ', SanLuongXom3[i] - SanLuongXom6[i]);
  end;
   readln;
end.

 


Các câu hỏi tương tự
Thanh Vân
Xem chi tiết
Thanh Vân
Xem chi tiết
Bùi Huỳnh Anh Sơn
Xem chi tiết
Đỗ Trọng TÍn
Xem chi tiết
Ngọc Hân Lương Thị
Xem chi tiết
Bao Duong
Xem chi tiết
Phạm Hữu Đức
Xem chi tiết
Ngọc Anh
Xem chi tiết
Thuận Ngô
Xem chi tiết