Quảng cáo
2 câu trả lời 282
2 năm trước
Program bt1;
Uses crt;
var a : integer;
S,C : real;
Begin
write('Nhap a=');readln(a);
S: = a*a;
C: = a*4
writeln ('Dien tich la',S);
writeln ('Chu vi la', C);
readln
End.
Quảng cáo
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK44870
-
Hỏi từ APP VIETJACK26682
Gửi báo cáo thành công!