Đáp án: viết phuong trình tính chu vi và diên tích của hình vuông với độ dài cạnh là a nhập từ bàn phím - Program bai_tap; Uses crt; Var a, Cv, S real; Begin Write (ʹNhap canh a=ʹ); Readln (a); Cv= 4*a; S= a*a; Writeln (ʹChu vi hinh vuong laʹ, Cv82); Writeln (ʹDien tich hinh vuong laʹ, S82); Readln End

Program bai_tap; Uses crt; Var a, Cv, S real; Begin Write (ʹNhap canh a=ʹ); Readln (a); Cv= 4*a; S= a*a; Writeln (ʹChu vi hinh vuong laʹ, Cv82); Writeln (ʹDien tich hinh vuong laʹ, S82); Readln End

Uses crt;Var p, s, a real; BeginClrscr;Write(ʹNhap canh a = ʹ); readln(a);p=a*4;s=sqr(a);Writeln(ʹChu vi cua hinh vuong la ʹ,p);Writeln(ʹDien tich cua hinh vuong la ʹ,s);Readlnend

Phạm Tấn Hưng

2 năm trước

viết phuong trình tính chu vi và diên tích của hình vuông với độ dài cạnh là a nhập từ bàn phím

Xem đáp án

25 lượt xem

2 câu trả lời

Anh Như

2 năm trước

Program bai_tap;

Uses crt;

Var a, Cv, S: real;

Begin

Write ('Nhap canh a=');

Readln (a);

Cv:= 4*a;

S:= a*a;

Writeln ('Chu vi hinh vuong la:', Cv:8:2);

Writeln ('Dien tich hinh vuong la:', S:8:2);

Readln

End.

Q. Trường

2 năm trước

Uses crt;
Var p, s, a: real;
Begin
Clrscr;
Write('Nhap canh a = '); readln(a);
p:=a*4;
s:=sqr(a);
Writeln('Chu vi cua hinh vuong la: ',p);
Writeln('Dien tich cua hinh vuong la: ',s);
Readln
end.