编写一个Prolog的star/1程序”。
创始人
2024-12-07 05:01:43
0次
star(N) :- star(N, 0).
star(N, N). star(N, I) :- I < N, draw_star(I), nl, I2 is I + 1, star(N, I2).
draw_star(N) :- N > 0, write('*'), N1 is N - 1, draw_star(N1). draw_star(0).
该程序用于打印一个 N 行的星星图案，其中第 i 行有 i 个星号。我们用递归方式实现它，star(N) 是程序的入口点。我们会将 N 传递给它，以确定星形图案的总行数。然后，它会调用一个名为 star(N,I) 的辅助函数，用于打印出 N 行以及第 i 行的所有星星。星形图案的第 i 行上有 i 个星号，因此我们需要传递 i 的值，并将其与该行上的应该有多少星号进行比较。
最后，我们再次使用递归来处理程序的行数和打印每行的星号。像前面一样，维护一个循环计数器（名为 I），并在每一行上打印出相应数量的星号，使用名为 draw_star 的辅助函数来完成。
相关内容
热门资讯
前端-session、jwt
目录： （1）session （2&#x...
linux入门---制作进度条
了解缓冲区 我们首先来看看下面的操作： 我们首先创建了一个文件并在这个文件里面添加了...
关于测试，我发现了哪些新大陆
关于测试 平常也只是听说过一些关于测试的术语，但并没有使用过测试工具。偶然看到编程老师...
前缀和与对数器与二分法
1. 前缀和 假设有一个数组，我们想大量频繁的去访问L到R这个区间的和，...
nodejs：本地安装nvm实...
一、背景-使用不同版本node的原因 vue3+ts、nuxt3版本，node...
JAVA集合知识整理
Java集合知识整理 HashMap相关 HashMap的底层数据结构：jdk1.8之...
无刷直流电机介绍及单片机控制实...
无刷直流电机介绍及单片机控制实例前言基本概念优势与劣势使用寿命基本结构使用单片机控制实例电子调速器&...
fwdiary(2) dp2
1.传纸条 AcWing 275. 传纸条 - AcWing 走两条路，走一条最大的...
常用的DOS命令
常用的DOS命令 DOS（Disk Operating System，磁...
＜C++＞ 类和对象(下)
1.const成员函数将const修饰的“成员函数”称之为const成员函数，cons...