

Đề: Viết chương trình pascal: Nhập cạnh và tính chu vi, diện tích hình vuông.
Giải:
Viết bài 1 lần, nhận nhuận bút cả đời: Đăng Ký
Giải:
Mã:
program ct1;
uses crt;
var a, c, s: real;
begin
write('nhap canh: ');
readln(a);
c := a * 4;
write('chu vi = ', c);
s := a * a;
write('dien tich = ', s);
readln;
end.
Viết bài 1 lần, nhận nhuận bút cả đời: Đăng Ký
Chỉnh sửa cuối: