lazarus解决三角形凑边长问题

lazarus 跨平台free pascal语言ide工具
http://www.fpccn.com/ 社区

下载ftp://freepascal.dfmk.hu/pub/lazarus/releases
https://sourceforge.net/projects/lazarus/files/

2021-2-22发布的2.0.12稳定版，2021-7-8发布的2.2rc1版本

小视频看到一个问题：一个外卖订单备注说一个直角边长11,另外2边整数，求外卖小哥解答，外卖小哥答复：我要是能解决这问题我就不至于送外卖了

为了鼓励家里小宝好好学习，这里把这个问题用一个穷举法简单解决一下，展示一下科学的魅力：

vara, b, c: integer;d: real;
begintrya := StrToInt(Edit1.Text);if a < 1 thenraise EConvertError.Create('');for b := 1 to 200 dobegind := sqrt(a * a + b * b);c := trunc(d);if (c * c) = (a * a + b * b) thenbeginEventLog1.Warning(IntToStr(a) + '*' + IntToStr(a) + '+' + IntToStr(b) + '*' +IntToStr(b) + '=' + IntToStr(c) + '*' + IntToStr(c));ShowMessage(IntToStr(a) + '*' + IntToStr(a) + '+' + IntToStr(b) + '*' + IntToStr(b) +'=' + IntToStr(c) + '*' + IntToStr(c));break;end;end;excepton EConvertError dobeginShowMessage('请输入一个正整数！');Edit1.Text := '';Edit1.SetFocus;end;end;
end;

Edit1.Text 是可以输入一个边长比如11，EventLog1.Warning是输出到日志，很有意思的结果

3*3+4*4=5*55*5+12*12=13*137*7+24*24=25*2511*11+60*60=61*6113*13+84*84=85*85

EventLog1是输出到日志的控件，在system控件组里，在窗体的create里启动一下即可

EventLog1.AppendContent:=true;EventLog1.LogType := ltFile;EventLog1.FileName := 'sqrt.log';EventLog1.Active := True;

------------------------------

顺手记一下deepinlinux下安装了新lazarus的2个自定义：

lazarus默认ide界面是分体式，为了改为一体式，打开主界面包》安装包》anchordocking和Sparta_DockedFormEditor
选中然后点选保存并重新编译IDE重启ide即可，默认缺少工程查看器，打开工程-》工程查看器，会跳出来一个可拖动的界面，鼠标点击很细的那个标题行，拖动到代码区坐上角，会自动停靠

安装完成工程文件默认图标没启用lazarus，我们就手动更新下

找到/usr/share/mime/packages/lazarus.xml文件，在lpi部分增加<generic-icon name="lazarus"/>

更新系统文件类型启用新图标即可 sudo update-mime-database -V /usr/share/mime

所用的图标文件默认是/usr/share/icons/deepin/apps/48/lazarus.svg

如果自己新建了ukui-icon-theme图标文件夹就更新一下缓存放文件管理器能找到
sudo gtk-update-icon-cache /usr/share/icons/ukui-icon-theme/

lazarus解决三角形凑边长问题相关推荐

C语言编程b a化简,C语言编程，已知三角形的三边长a,b,c，计算求三角... 如果三角形三边长 a,b,c,满足（）那么这个三角形......
导航:网站首页 > C语言编程,已知三角形的三边长a,b,c,计算求三角... 如果三角形三边长 a,b,c,满足( )那么这个三角形... C语言编程,已知三角形的三边长a,b,c,计算求三角 ...
Python编程输出三角形的边长及面积
题目: 1.设计一个小程序,运用操作运算符实现输入三角形的边长.输出三角形的边长及面积. 输入三角形的三条边长如果三条边长构成三角形则输出周长及面积,否则输出"三条边的长度不能构成三角形& ...
【C语言】练习：给出三角形三边长，求三角形面积
[C语言]练习:给出三角形三边长,求三角形面积题目:给出三角形三边长,求三角形面积思路: 1.任意给出三边,能构成三角形的条件:任意两边之和大于第三边. 2.三角形面积计算公式(海伦公式) 设三角 ...
C语言实现输入三角形两边边长以及夹角求三角形第三边边长与面积
来源:大工慕课链接作者:Caleb Sung 解答示范 #include<stdio.h> #include<math.h> int main() {int a, b, t ...
输入三角形三边边长，求三角形的面积
输入三角形三边边长,求三角形的面积 #include<stdio.h> #include<math.h> int main() { double a,b,c,s,area; s ...
根据三角形的三条边长（长、中、短三条边），来判断三角形类型。注意： 1.一个三角形的边长应该都为正数 2.一个三角形的边长都应该满足三角形条件：两边之和大于第三边如果有两边的
/*根据三角形的三条边长(长.中.短三条边),来判断三角形类型.注意: 1.一个三角形的边长应该都为正数 2.一个三角形的边长都应该满足三角形条件:两边之和大于第三边如果有两边的平方和比第三边的平方 ...
C语言：输入三角形的边长，求出三角形的周长，面积和，若不能构成，则提示出来，
//3.输入三角形的边长,求出三角形的周长,面积和,若不能构成,则提示出来, #include <stdio.h> #include <math.h> int main(int ...
java三角形边长_利用java解决三角形角度问题
三角形角度公式: 从以上公式中我们可以看出,要计算角度,就必须知道边长,那么我们该如何计算边长呢? 首先我们需要知道三个顶点的坐标,然后计算点与点之间的距离即可. 代码: package com.zh ...
已知三角形三边长怎么求面积_已知三角形三边求面积的公式——海伦公式
海伦公式又译作希伦公式.海龙公式.希罗公式.海伦-秦九韶公式,传说是古代的叙拉古国王希伦(Heron,也称海龙)二世发现的公式,是一个利用三角形的三条边长直接求三角形面积的公式.下面我们利用初中的知识 ...

lazarus解决三角形凑边长问题

lazarus解决三角形凑边长问题相关推荐

最新文章

热门文章