<html>
<head> <title>Cirle</title>
<%
sub cirle(r )
dim area, diameter
area = 3.14* r^2
response. write (" Area = area"& area &" </br")
response.write ("diameter =" & diameter)
end sub
%>
</head>
<body>
<b>result : </br> <% Call cirle (5) %>
<body>
<html>
<head> <title>Cirle</title>
<%
sub cirle(r )
dim area, diameter
area = 3.14* r^2
response. write (" Area = area"& area &" </br")
response.write ("diameter =" & diameter)
end sub
%>
</head>
<body>
<b>result : </br> <% Call cirle (5) %>
<body>
<html>
No comments:
Post a Comment