hãy viết chương trình tính giá trị trung bình của 2 số nguyên a và b (0<a,b<200) được nhập vào từ bàn phím( kết quả làm tròn đến 2 chữ số thập phân)
Bài 5: Khai báo biến
Viết chương trình nhập vào 1 dãy a gồm n số nguyên durong a1, a2,an (1
hãy khai báo biến cho bài toán sau nhập độ dài 3 cạnh của 1 tam giác và in ra mà hình diện tích tam giác đó
Program tamgiac;
Var a,b,c:integer;
S,p:real;
Begin
Write(' Nhap 3 canh cua tam giac:');readln(a,b,c);
p:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
Write(' dien tich hinh tam giac la:',S);
Readln;
End.
Chúc bạn học tốt!
Đúng 1
Bình luận (0)
program dientich_tam_giac;
uses crt;
var a,b,c:integer;
p,s:real;
begin
clrscr;
write('nhap a='); readln(a);
write('nhap b='); readln(b);
write('nhap c='); readln(c);
if (a+b>c) and (a+c>b) and (b+c>a) then
begin
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln('dien tich tam giac la: ',s:4:2);
end
else writeln('day khong phai la 3 canh cua tam giac');
readln;
end.
Đúng 0
Bình luận (0)
Phát biểu nào sau đây là sai:
A. Dữ liệu kiểu byte có 256 giá trị từ 0, 1, 2, …, 255.
B. Kiểu dữ liệu của biến phải là kiểu dữ liệu chuẩn.
C. Trong Pascal các biến cùng kiểu có thể được khai báo trong cùng một danh sách biến, các biến cách nhau bởi dấu phẩy.
D. Cách khai báo biến trong ngôn ngữ lập trình khác nhau có thể khác nhau.
