nó thông báo Invalid numeric format
program chuvidientichhinhthang;
uses crt;
var b,a,alpha: real;
P,S,h: real;
begin
write('nhapdaylon,daynhovagocalpha');
read(b,a,alhpa);
h:=(b-a)*sin(alpha)/cos(alpha);
P:=a+b+h+h/sin(alpha);
S:=(a+b)*h/2;
writeln('chuvi,dientich ',P,S);
readln.
end.
đây là bài tính diện tích hình thang vuông đáy lớn b , đáy nhỏ a,và góc alpha
Bookmarks