Pascal新秀編程

Ryuno Lingyou的句子長到可以短。為什麽不呢？由我決定。

1.var i:整數；

開始

for i:=1到5 do

如果i=3那麽writeln('XXXX ')否則writeln('X '，' '，' X ')；

結束。

2.我可以把它推廣到任何兩位數的數字(三位數，四位數...n位數都可以)

下面是壹個任意兩位數的程序

var n:整數；

開始

readln(n)；

writeln(n mod 10，n div 10)；

結束。

其中N=67，您可以輸入其他兩位數、三位數、四位數...n位數可以用同樣的方法編程。

上一篇:icprog 燒寫pic單片機用什麽編程器

下一篇:常見的鋁型材擠壓機噸位有哪些？