求圆的面积和周长的代码如下：
clc,clear all
x=input('请输入圆的半径 r=');
S=pi*x^2;
L=2*pi*x;
disp(['圆的面积 S=',num2str(S)])
disp(['圆的周长 L=',num2str(L)])
