Tin học Nhập vào bán kính hình tròn in ra diện tích và chu vi của nó 30/07/2021 By Raelynn Nhập vào bán kính hình tròn in ra diện tích và chu vi của nó
uses crt;var r:real;beginclrscr; write(‘r=’);readln(r); writeln(‘Dien tich: ‘,r*r*pi); writeln(‘Chu vi: ‘,r*2*pi);readln;end. Trả lời
Program NN;Uses crt;Const pi=3.14;Var r,p,s: extended;Begin Clrscr; Write(‘Nhap r: ‘); Readln(r); s:=r*r*pi; p:=2*r*pi; Writeln(‘S = ‘,s:0:2); Writeln(‘P = ‘,p:0:2); ReadlnEnd. Trả lời
uses crt;
var r:real;
begin
clrscr;
write(‘r=’);readln(r);
writeln(‘Dien tich: ‘,r*r*pi);
writeln(‘Chu vi: ‘,r*2*pi);
readln;
end.
Program NN;
Uses crt;
Const pi=3.14;
Var r,p,s: extended;
Begin
Clrscr;
Write(‘Nhap r: ‘); Readln(r);
s:=r*r*pi;
p:=2*r*pi;
Writeln(‘S = ‘,s:0:2);
Writeln(‘P = ‘,p:0:2);
Readln
End.