Question

Viết chương trình tính diện tích hình tròn,biết bán kính được nhập từ bàn phím.

Answer 1

Trả lời:

Program S_Hinh_Tron;
Uses Crt;
Var r,S:real;
Begin
Clrscr;
Writeln(‘TINH DIEN TICH HINH TRON:’);
Write (‘Nhap ban kinh R=’);readln(r);
dt:=pi*r*r;
Writeln(‘Dien tich hinh tron la:’,dt:6:2);
Readln;
End.

Chúc bạn học tốt!

Answer 2

Program dthinhtron;
uses crt;
var r,s:real;
begin
clrscr;
writeln('Nhap ban kinh r: ');
readln(r);
s:=r*r*PI;
writeln('dien tich hin tron la: ',s:8:3,'m2);
readln
end.

Answer 3

var r,dt:real;
begin
writeln('Nhap ban kinh r: ');readln(r);
dt:=r*r*pi;
writeln('dien tich hinh tron la: ',s:6:2);
readln;
end.

Answer 4

ấy lại

var r,dt:real;
begin
writeln('Nhap ban kinh r: ');readln(r);
dt:=r*r*pi;
writeln('dien tich hinh tron la: ',dt:6:2);
readln;
end.