perl编程语言_c语言编程题库

第一题

写一个程序，计算圆的周长。要求：
1.用户键入半径，计算相应周长
2.当用户键入的半径为负数时，周长输出为0

$pi=3.14; print "please enter radius:\n"; chomp($r=<STDIN>); if($r<0){ 
    $c=0; } else { 
    $c=2*$pi*$r; } print "The perimeter is $c\n"; 

第二题

写一个程序，提示用户键入一个字符串和一个数字，然后以数字为重复次数，连续输出字符串。要求：
1.字符串和数字分两行键入
2.在用户键入“LuLu”和“3”时，应该会出现3行“LuLu”

print "please enter a string and a number:\n"; print "string is: "; $string=<STDIN>; #由于需要自动换行,此处保留换行符"\n" print "number is: "; chomp($number=<STDIN>); print "the result is :\n".$string x $number; 

版权声明：

本文来自互联网用户投稿，该文观点仅代表作者本人，不代表本站立场。本站仅提供信息存储空间服务，不拥有所有权，不承担相关法律责任。
如若内容造成侵权、违法违规、事实不符，请将相关资料发送至xkadmin@xkablog.com进行投诉反馈，一经查实，立即处理！

转载请注明出处，原文链接：https://www.xkablog.com/perlbc/1783.html