OneCompiler

Alter

104

SQL> create table ar(radius number(5), area number(14,2));

Table created.

SQL> declare
2 r number(5);
3 ar number(14,2);
4 pi constant number (4,2):=3.14;
5 begin
6 r:=5;
7 while r<=9
8 loop
9 ar:=pi*power(r,2);
10 insert into ar values(r,ar);
11 r:=r+1;
12 end loop;
13 end;
14 /
PL/SQL procedure successfully completed.
SQL> select * from ar;
RADIUS AREA


5 78.5
6 113.04
7 153.86
8 200.96
9 254.34