1樓：賽賽呀
被亂拋亂甩，在貪婪的忘川上漂泊……
我給你寫首詩講講下雨：
把衣服放在身旁
朵朵行雲如飛，
在黑色的洪荒上
相他在為命的親這個突然得的絕症的噩運哈哈
2樓：勝利之鷹
我也有過類似的事，把程式關閉在開啟，也許可以
3樓：匿名使用者
為什麼不能執行?
它那麼顯示是什麼錯誤?
我自己編譯了一下,沒問題呀!
你是求已知半徑圓形面積呀.沒錯呀.
你是用什麼工具來編譯?
4樓：匿名使用者
沒問題！
只不過最後輸出的數以科學表示法表示罷了。
在s後面加上：0：11就行了
（表示整數0位（按實際位數輸出）；小數11位）。
5樓：匿名使用者
如果你程式輸入2，輸出為s= 1.256636000000000e+001
則該程式是對的。'1'前面的空格是正負號格，
後面'1.256636000000000e+001'是科學計數法，是一種特定格式。
還有一種可能是程式第二行的'pi'是一個函式，而不能作為常量。（詳見《全國青少年資訊學奧林匹克聯賽培訓教材（中學）》書末函式表）
要追求完美，這兒有一個：
program area;
varr:integer;
begin
readln(r);
write(pi*sqr(r):0:9);//表示整數0位,小數9位
end.
6樓：匿名使用者
這個程式沒有問題啊。可以執行。你具體遇到什麼問題了。是不是沒有給讀入。
7樓：ice璐璐
恩？你居然發了兩個一樣的問題……
放心真的是沒有問題的……
那個答案我已經發在另一個問題上了
8樓：市守沐
絕對~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~沒問題
o(∩_∩)o...
9樓：
啊...我執行了一下你的程式,可以執行啊...你是在求圓的面積嘛...
做了一個free pascal程式，但是不能執行，請問為什麼
求pascal快速排序的程式，求pascal快速排序的程式一個。
var a array 1.100 of integer i,n integer procedure pop l,r integer var p1,p2,x,t integer begin p1 l p2 r x a l r div 2 repeat while a p1 x do inc p1 w...
求8數碼問題的A 演算法程式（PASCAL語言）
求8數碼a或a 演算法 用c語言 dfs hash 記憶化 爐灰出品。include define n 4 define swap a,b a a b b a b a a b int map n n hashta 99991 path 2000 min 150,book n n h 0,step 0...
急求 在家編制新的PASCAL程式為什麼會出現錯誤
翻譯下 錯誤15 檔案未找到 system.tpu system.tpu是pascal的核心單元,我們用的abs,trunc及所有常用語句都是這個單元中的,缺了這個單元肯定是沒法編譯的.檢查一下你的tp目錄下的unit目錄,看看有沒有system.tpu,沒有的話趕緊重灌.你是不是用vista了，軟...