爱问知识人 爱问教育 医院库

pascal程序

搜索
我要提问
首页
电脑/网络
软件

pascal程序

program ex1;
const p=3.1415926
var r:integer;
    s:real;
begin
readln(r);
s:=p*r*r;
write(s)
end.

这个程序又有什么问题啊

高***
回答
提交回答
好评回答
  • 2009-09-20 09:08:20 
    没什么大问题，注意行间小写分号，如果你是在Delphi下编译，请在前面加上"{$apptype console$}"。
附完整代码：
{$apptype console$}
program ex1;
const
  p=3.1415926;
var
  r:integer;
  s:real;
begin
  readln(r);
  s:=p*r*r;
  writeln('s=',s:5:2);
end.

    r***

    2009-09-20 09:08:20

    59 0 评论
    分享
    提交评论
展开更多答案

类似问题

换一换

  • 软件 相关知识

  • 电脑网络技术
  • 电脑网络

相关推荐

正在加载...
最新问答 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
问题大全
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 0-9
主题大全
A B C D E F G H I J K L M N O P Q R S T U V W X Y Z 0-9
关于我们 爱问协议 帮助中心

Copyright © 1996-2019 IASK Corporation, All Rights Reserved

返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选)：

放弃 确定报告