Bạn chưa đăng nhập. Vui lòng đăng nhập để hỏi bài
Nguyen Hong Anh

cho tệp X gồm có nhiều dòng, mỗi dòng có chứa 2 số nguyên a,b (a,b là số nguyên dương<=100). viết chương trình tính chu vi, diện tích hình chữ nhật với chiều dài a, chiều rộng b được đọc ra từ tệp X

Nguyễn Lê Phước Thịnh
17 tháng 3 2021 lúc 21:40

uses crt;

const fi='x.inp'

var f1:text;

a,b:array[1..100]of integer;

i,n:integer;

begin

assign(f1,fi); reset(f1);

n:=0;

while not eof(f1) do 

begin

n:=n+1;

readln(f1,a[n],b[n]);

end;

for i:=1 to n do 

  begin

writeln('Chu vi dong ',i,' la: ',(a[i]+b[i])*2);

writeln('Dien tich dong ',i,' la: ',a[i]*b[i]);

end;

close(f1);

readln;

end.


Các câu hỏi tương tự
Quỳnh Phan
Xem chi tiết
Nguyễn Văn Hùng
Xem chi tiết
Duyvvv
Xem chi tiết
Ngọc Hồng
Xem chi tiết
Trần Văn Tiến
Xem chi tiết
Trần Văn Lượng
Xem chi tiết
Trần Văn Lượng
Xem chi tiết
Ngọc Hồng
Xem chi tiết
Nguyễn Gia Bảo
Xem chi tiết