الأجوبة
Program Exe5(I,O);
Var
R: integer;
Area: real;
Const pi=3.14;
Begin
writeln ('Enter circle radius');
Readln(r);
Area: =sqr(r)*pi;
writeln ('area= ',area:5:1);
end.
القوائم الدراسية التي ينتمي لها السؤال
معلومات ذات صلة
Program Exe5(I,O);
Var
R: integer;
Area: real;
Const pi=3.14;
Begin
writeln ('Enter circle radius');
Readln(r);
Area: =sqr(r)*pi;
writeln ('area= ',area:5:1);
end.
القوائم الدراسية التي ينتمي لها السؤال
معلومات ذات صلة