Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.
Program bai4;
Const pi:= 3.1416;
Var cv,dt,r:real;
Begin
R:=5.5;
cv:=2*Pi*r;
dt:=pi*r*r;
Writeln('chu vi hinh tron la:',cv);
Writeln('Dien tich hinh tron la:',dt);
readln
End.
Hàm const làm gì có : bạn.
Đáng nhẽ R thành r chứ.
Sai kiến thức là bay đầu đó bạn." Bút xa gà chết" đấy.
Var cv, dt : integer
r : real;
Const pi = 3.14;
Begin
r = 5.5;
dt := pi*r*r;
writeln(‘Dien tich hinh tron la:,dt:8:2’);
readln
End.
Const pi:= 3.14;
Var cv:integer -> Thiếu dấu ; khi kết thúc 1 câu lệnh nào đó. (Var cv:integer; )
R:real;
Begin
R:=5.5;
Cv=2*pi*r;
Writeln('chu vi la:=cv'); -> Câu lệnh không lỗi nhưng để in ra kết quả thì biến cv cần nằm ở ngoài dấu nháy. ( Writeln('chu vi la= ',cv); )
Readln
End.
var a,b,c,P,S:real;
begin
write('nhap a: ');readln(a);
write('nhap b: ');readln(b);
write('nhap c: ');readln(c);
P:=a+b+c;
S:=a*a/2;
writeln('chu vi: ',P);
write('dien tich: ',S);
readln
end.
- Vì là số đo cạnh tam giác nên bạn nên khai báo bằng kiểu dữ liệu real (số thực) thay vì integer (số nguyên).
- Phần giá trị biến S, vì a ứng với h nên \(\frac{ah}{2}=\frac{aa}{2}\)
- Xét tổng quan về nội dung cả hai chương trình này đều chưa đủ. Vì a=h => tam giác cần tìm diện tích và chu vi là tam giác vuông => phải thỏa mãn aa = bb + cc hoặc bb=aa+cc hoặc cc=aa+bb (định lí pitago)
- Nhưng trước hết, phải thỏa mãn bất đẳng thức tam giác: (dài lắm........ko viết đâu). Nếu bạn chưa học câu lệnh điều kiện thì chắc là 2 chương trình này đã đủ nội dung.
nhap a,b gop lam 1 dc nhe
program Tich;
uses crt;
var a:b,Tich; integer;
begin
clrscr;
Write('nhap a va b='); readln(a,b);
Tich:a*b;
Writeln('tich cua a va b la:', Tich:1:0);
Readln;
end.
Dòng 1 tên chương trình khai báo sai
sửa lại program hinh_tron;
Dòng 2 phần kahi báo k có dấu "=" trước integer
sửa lại vả cr,dt,t: integer;
Dòng 6 thiếu dấu"=" sau dấu ":"
sửa lại dt:=pi*r*r;
Dòng 7 lệnh in kq sai
sửa lại writeln(' chu vi la:',cv);
Dòng 8 lênh in kq sai
sửa lại writeln(' dien tich la:',dt);
Dòng 1,2,4,5,6,7,8,9 thiếu ;
và dòng 10 thiếu "."