长沙到娄底坐汽车多久:Pascal编程

来源：百度文库 编辑：杭州交通信息网 时间：2024/04/28 02:00:38
从键盘上读入长方形的边长a,b，计算它的面积和周长，输出。

Program pro1(Input,Output)；
Var
a,b,C,S:Real；
Begin
Write('Input a and b':)；
Readln(a,b)；
C:=2*(a+b)；
S:=a*b；
Writeln('S is:',S)；
Writeln('C is:',C)；
End.

编程PASCAL pascal编程 pascal编程： Pascal编程 Pascal编程 Pascal编程 Pascal编程 pascal编程 pascal编程 pascal编程