ada loop get示例代码
代码语言:ada
所属分类:其他
代码描述:ada loop get示例代码
代码标签: 示例
下面为部分代码预览,完整代码请点击下载或在bfwstudio webide中打开
-- illustrates use of Get and Skip_Line with Ada.Text_IO; use Ada.Text_IO; procedure Getest is I : Integer := 0; C : Character; begin loop I := I + 1; if End_Of_Line then .........完整代码请登录后点击上方下载按钮下载查看
网友评论0