通过编写“猜数字”游戏来学习Ada编程语言这些概念是大多数编程语言的基础。一旦你理解了它们,你就可以开始考虑其他事情了。因为编程语言往往有相似之处,一旦你了解了一种语言,你就可以通过了解它的差异来学习另一种语言的基础知识。学习一门新语言的一个好方法是用标准程序练习它。这使您能够专注于语言,而不是程序的逻辑。在本系列文章中,我使用了一个“猜数字”程序,计算机从1到100之间选择一个数字,让你猜它。程序循环直到你猜对了数字。这个程序练习了编程语言中的几个概念:可变输入输出条件判断循环这是一个很好的学习新的编程语言的实践实验。安装AdaAda编程语言是一种独特的、高度结构化的语言,由一群专门的开发人员使用。Ada的工具链是GNUAda开发环境,通常称为GNAT。您可以使用发行版的包管理器在Linux上安装GNAT。在Fedora、CentOS或类似系统上:$sudodnfinstallgcc-gnat在Debian、LinuxMint和衍生产品上:$sudoaptinstallgnat在macOS和Windows上,您可以从Adacore网站下载安装程序(从下拉列表中选择您的平台-向下菜单)。在Ada中猜数字创建一个名为game.adb的文件。该程序使用两个内置的Ada库:Text_IO和Numerics.Discrete_Random:withAda.Text_IO;使用Ada.Text_IO;与Ada.Numerics.Discrete_Random;processheaderprocedureprocedure注意,discrete_random专门针对特定范围。在这里,数字的范围是允许的:procedureGame是类型randRange,范围是1..100;包Rand_Int是新的ada.numerics.discrete_random(randRange);使用Rand_Int;gen:发电机;数量:随机范围;不正确:布尔值:=真;猜测:randRange;流程逻辑逻辑从reset(gen)开始。这将初始化随机数生成器,确保每次运行程序时使用random(gen)初始化的数字都不同。下一步是运行循环:输出猜测的指令读取该行以将其转换为randRange。它会根据数字进行检查,如果数字匹配,则将不正确设置为False,从而导致循环的下一次迭代退出。最后,程序在退出前打印出猜测正确性的确认信息:beginreset(gen);num:=随机数(gen);while不正确的循环Put_Line(“猜一个1到100之间的数字”);声明guess_str:String:=Get_Line(Current_Input);开始猜测:=randRange'Value(guess_str);结尾;ifguess
