tag:blogger.com,1999:blog-30086037982466211602024-02-02T10:12:07.163-08:00 Computer SciencesThis blog gives you informations about internet, programming and computing news...Adam Lahbibhttp://www.blogger.com/profile/11375756234792081402noreply@blogger.comBlogger3125tag:blogger.com,1999:blog-3008603798246621160.post-66868688342255330862016-07-01T08:55:00.001-07:002016-07-01T08:55:37.114-07:00PASCAL - Lesson 3<h2>
<span style="font-family: "verdana" , sans-serif;">PROGRAMMING </span><span style="font-family: "verdana" , sans-serif;">PASCAL</span></h2>
<h4>
<span style="font-family: "verdana" , sans-serif;">LESSON 2</span></h4>
<br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">Now we will focus on operations and strings</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">We will learn also IF statement</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">Let's start</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span></b></span>
<span style="font-family: trebuchet ms, sans-serif;"><b>We will make a calculator using Pascal</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>IF statement looks like this</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>if -condition- then</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>begin</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> operations...</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>end;</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<span style="font-family: trebuchet ms, sans-serif;"><b>But if there is many conditions</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>it will look like this</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<span style="font-family: trebuchet ms, sans-serif;"><b>if -condition- then</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>begin</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> operations...</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>end</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>else if -condition2- then</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>begin</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> operations...</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>end</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>.</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>.</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>.</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>else -other conditions- then</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>begin</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> operations...</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>end;</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<span style="font-family: trebuchet ms, sans-serif;"><b>*** CALCULATOR ***</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>program calc;</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>uses wincrt;</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>var x,y,res:integer;</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> sel:char;</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<span style="font-family: trebuchet ms, sans-serif;"><b>BEGIN</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> writeln('1. Addition');</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> writeln('2. Substraction');</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> writeln('3. Multiplication');</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b> writeln(' Select: ');Readln(sel);</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>write('Enter an integer a=');readln(a);</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>write('Enter an integer b=');readln(b);</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>if sel='1' then res=a+b</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>else if sel='2' then res=a-b</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>else if sel='3' then res=a*b</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>else write('Invalid number.');</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>end.</b></span><br />
<br />
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<br />
<br />Adam Lahbibhttp://www.blogger.com/profile/11375756234792081402noreply@blogger.com0tag:blogger.com,1999:blog-3008603798246621160.post-5573741421989368942016-07-01T08:16:00.001-07:002016-07-01T08:16:27.288-07:00Pascal - Lesson 2<h2>
<span style="font-family: "verdana" , sans-serif;">PROGRAMMING </span><span style="font-family: "verdana" , sans-serif;">PASCAL</span></h2>
<h4>
<span style="font-family: "verdana" , sans-serif;">LESSON 2</span></h4>
<br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">In this lesson we will learn variables integer; real; char; string...</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">Example:</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">Integer: 25 4 -2 3 85</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">Real: 120.36 -9.66 45.12</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">Char: A B C D E f g h i j k l</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;">String: PASCAL programming Hello</span></b></span><br />
<br />
<span style="font-family: trebuchet ms, sans-serif;"><b>we put variables after uses wincrt line.</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b>Example var Num1,Num2:Integer;</b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<span style="font-family: trebuchet ms, sans-serif;"><b>Integers have ranges limits and types</b></span><br />
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhhpvwM8M5taQva_anuPgLp4ePNfPrXi8fChI_ex6_tv-U0AF3m7t-_4VoqsvjvD_JicS4dMrbsN75wJ7EmEklqi4aln9bbv_YlL7BUvdeJHAdi4TpjkpWBaakiqpDZSy_uGiG_2TjFg54d/s1600/pascal_datatype.jpg" imageanchor="1" style="margin-left: 1em; margin-right: 1em;"><img border="0" height="319" src="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEhhpvwM8M5taQva_anuPgLp4ePNfPrXi8fChI_ex6_tv-U0AF3m7t-_4VoqsvjvD_JicS4dMrbsN75wJ7EmEklqi4aln9bbv_YlL7BUvdeJHAdi4TpjkpWBaakiqpDZSy_uGiG_2TjFg54d/s640/pascal_datatype.jpg" width="640" /></a></div>
<span style="font-family: trebuchet ms, sans-serif;"><b><br /></b></span>
<div style="text-align: left;">
</div>
<div class="separator" style="clear: both; text-align: center;">
<a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiMIoLKgLIViDsUaITrCPUTqtCYHVo3mQZQGAuRKYIETCSoQWb-F4fAYCtQlK_jEQ3lbcehDE9wqZROT6HPs68pbaOGbW-wAxz_XcjM7EFdDGeQjgkDd8p2ioxKydrpo1f33SxvRhwiiQgl/s1600/images.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiMIoLKgLIViDsUaITrCPUTqtCYHVo3mQZQGAuRKYIETCSoQWb-F4fAYCtQlK_jEQ3lbcehDE9wqZROT6HPs68pbaOGbW-wAxz_XcjM7EFdDGeQjgkDd8p2ioxKydrpo1f33SxvRhwiiQgl/s1600/images.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiMIoLKgLIViDsUaITrCPUTqtCYHVo3mQZQGAuRKYIETCSoQWb-F4fAYCtQlK_jEQ3lbcehDE9wqZROT6HPs68pbaOGbW-wAxz_XcjM7EFdDGeQjgkDd8p2ioxKydrpo1f33SxvRhwiiQgl/s1600/images.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiMIoLKgLIViDsUaITrCPUTqtCYHVo3mQZQGAuRKYIETCSoQWb-F4fAYCtQlK_jEQ3lbcehDE9wqZROT6HPs68pbaOGbW-wAxz_XcjM7EFdDGeQjgkDd8p2ioxKydrpo1f33SxvRhwiiQgl/s1600/images.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiMIoLKgLIViDsUaITrCPUTqtCYHVo3mQZQGAuRKYIETCSoQWb-F4fAYCtQlK_jEQ3lbcehDE9wqZROT6HPs68pbaOGbW-wAxz_XcjM7EFdDGeQjgkDd8p2ioxKydrpo1f33SxvRhwiiQgl/s1600/images.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiMIoLKgLIViDsUaITrCPUTqtCYHVo3mQZQGAuRKYIETCSoQWb-F4fAYCtQlK_jEQ3lbcehDE9wqZROT6HPs68pbaOGbW-wAxz_XcjM7EFdDGeQjgkDd8p2ioxKydrpo1f33SxvRhwiiQgl/s1600/images.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiMIoLKgLIViDsUaITrCPUTqtCYHVo3mQZQGAuRKYIETCSoQWb-F4fAYCtQlK_jEQ3lbcehDE9wqZROT6HPs68pbaOGbW-wAxz_XcjM7EFdDGeQjgkDd8p2ioxKydrpo1f33SxvRhwiiQgl/s1600/images.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a><a href="https://blogger.googleusercontent.com/img/b/R29vZ2xl/AVvXsEiMIoLKgLIViDsUaITrCPUTqtCYHVo3mQZQGAuRKYIETCSoQWb-F4fAYCtQlK_jEQ3lbcehDE9wqZROT6HPs68pbaOGbW-wAxz_XcjM7EFdDGeQjgkDd8p2ioxKydrpo1f33SxvRhwiiQgl/s1600/images.png" imageanchor="1" style="clear: left; float: left; margin-bottom: 1em; margin-right: 1em;"><br /></a></div>
<span style="font-family: trebuchet ms, sans-serif;"><b style="background-color: white;"><br /></b></span>
<span style="font-family: "verdana" , sans-serif;"><b style="background-color: #cccccc;"><span style="font-family: "trebuchet ms" , sans-serif;"><span style="background-color: white;">Reals also have types:</span></span><span style="background-color: #cccccc; font-family: "helvetica neue" , "arial" , "helvetica" , sans-serif; font-size: x-small;"><span style="color: purple; font-family: "courier new" , "courier" , monospace; font-size: small;"><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span></span></span></b></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>You can use Real or Double.</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b><br /></b></span></span>
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b><br /></b></span></span>
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>Operators in Pascal</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>+ Addition</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>- Substraction</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>* Multiplication</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>/ Division (Integer/real result)</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>DIV Division (Integer result)</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>MOD Division (Integer result the rest of division)</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>> Superiour</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>< Inferiour</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b> <> Differnce</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b> = Equality</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b><br /></b></span></span>
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>When we use variables we use in the main program readln to read the varible</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>Example</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b><br /></b></span></span>
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>program test;</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>uses wincrt;</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>var Num1:Integer;</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>begin</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>write('Enter an integer');</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>readln(Num1);</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>write(Num1);</b></span></span><br />
<span style="font-family: trebuchet ms, sans-serif;"><span style="background-color: white;"><b>end.</b></span></span>Adam Lahbibhttp://www.blogger.com/profile/11375756234792081402noreply@blogger.com0tag:blogger.com,1999:blog-3008603798246621160.post-64482463462793337972016-07-01T07:46:00.003-07:002016-08-31T13:35:43.157-07:00Pascal - Lesson 1<h2>
<span style="font-family: "verdana" , sans-serif;">PROGRAMMING </span><span style="font-family: "verdana" , sans-serif;">PASCAL</span></h2>
<h4>
<span style="font-family: "verdana" , sans-serif;">LESSON 1</span></h4>
<span style="font-family: "verdana" , sans-serif;"><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span><span style="font-family: "trebuchet ms" , sans-serif;"><b>We will begin with simple programs. We begin with 'Hello World' program.</b></span></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span><span style="font-family: "trebuchet ms" , sans-serif;">As any languages has rules, grammar, syntax... Pascal has his own rules and you should obey it.</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span><span style="font-family: "trebuchet ms" , sans-serif;">The program name we write (program myfirstprog)</span><span style="font-family: "trebuchet ms" , sans-serif;">we use begin in the program beginning and end on its ending</span><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span><span style="font-family: "trebuchet ms" , sans-serif;">but before that we write uses means using a library like wincrt which allow writing and reading variables.</span><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span><span style="font-family: "trebuchet ms" , sans-serif;">after we put BEGIN we want to show this message on computer screen "Hello World"</span><span style="font-family: "trebuchet ms" , sans-serif;">so it will be like that write('Hello world');</span><span style="font-family: "trebuchet ms" , sans-serif;">this is a line each line ends with ;</span><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span><span style="font-family: "trebuchet ms" , sans-serif;">The program will be like this:</span></b></span><br />
<span style="font-family: "verdana" , sans-serif;"><b style="background-color: #cccccc;"><span style="font-family: "trebuchet ms" , sans-serif;"><br /></span><span style="font-family: "helvetica neue" , "arial" , "helvetica" , sans-serif; font-size: x-small;"><span style="color: purple; font-family: "courier new" , "courier" , monospace; font-size: small;"><span style="font-family: "trebuchet ms" , sans-serif;">program myfirstprog;</span></span></span></b></span><br />
<span style="font-family: "helvetica neue" , "arial" , "helvetica" , sans-serif; font-size: x-small;"><span style="color: purple; font-family: "courier new" , "courier" , monospace; font-size: small;"><span style="font-family: "verdana" , sans-serif;"><b style="background-color: #cccccc;">uses wincrt;</b></span></span></span><br />
<span style="font-family: "helvetica neue" , "arial" , "helvetica" , sans-serif; font-size: x-small;"><span style="color: purple; font-family: "courier new" , "courier" , monospace; font-size: small;"><span style="font-family: "verdana" , sans-serif;"><b style="background-color: #cccccc;">BEGIN</b></span></span></span><br />
<span style="font-family: "helvetica neue" , "arial" , "helvetica" , sans-serif; font-size: x-small;"><span style="color: purple; font-family: "verdana" , sans-serif; font-size: small;"><b style="background-color: #cccccc;"><span style="font-family: "trebuchet ms" , sans-serif;"> </span><span style="font-family: "trebuchet ms" , sans-serif;"> write('Hello World');</span></b></span></span><br />
<span style="font-family: "helvetica neue" , "arial" , "helvetica" , sans-serif; font-size: x-small;"><span style="color: purple; font-family: "courier new" , "courier" , monospace; font-size: small;"><span style="font-family: "verdana" , sans-serif;"><b style="background-color: #cccccc;">END.</b></span></span></span><br />
<a href="http://purchasesharesonline.com/exch_share_info.php?stockid=GPA"><span style="font-family: "verdana" , sans-serif;"><span style="font-family: "helvetica neue" , "arial" , "helvetica" , sans-serif; font-size: x-small;"><span style="font-family: "trebuchet ms" , sans-serif;"><span style="color: purple;"><br /></span></span></span><span style="font-family: "helvetica neue" , "arial" , "helvetica" , sans-serif; font-size: x-small;"><span style="font-family: "trebuchet ms" , sans-serif;">I</span></span><span style="font-family: "trebuchet ms" , sans-serif;"> think Pascal is the easiest programming language</span></span><br />
<span style="font-family: "verdana" , sans-serif;"><span style="font-family: "trebuchet ms" , sans-serif;">Install Pascal </span></span></a><span style="font-family: "verdana" , sans-serif;"><span style="font-family: "trebuchet ms" , sans-serif;"><a href="http://ccm.net/download/download-24152-turbo-pascal">here</a></span></span><br />
<br />
<h3>
</h3>
Adam Lahbibhttp://www.blogger.com/profile/11375756234792081402noreply@blogger.com0