这段pascal错在哪

这个程序是输入圆的半径然后计算出该圆的周长及面积。

错误有：
1、writen('c=',c);
writen('s=',s);
writeln错写为writen
应为：writeln('c=',c);
writeln('s=',s);
前面的writen('Enter r=');也是这个错误
2、s:pi*r*r
在Pascal中，赋值号为:= ，而不是:
应为：s:=pi*r*r
3、此程序中调用了c、s、r三个变量，却没有声明，所以应在zero=0;和begin之间添加：
var
c,s,r:real
将三个变量声明为实型变量

writeln('Enter r=');readln(r);意思为：
首先输出 Enter r= 提示用户输入半径
然后将用户输入的半径读入并存储在实型变量r中

writeln('c=',c);writeln('s=',s);意思为：
输出 c= 及计算出的周长（即变量c的值）
输出 s= 即计算出的面积（即变量s的值）

这是什么编程语言用于什么的呀?

writen改成writeln
赋值号为：＝
变量没有定义。