A practical introduction to Pascal programming language - GIARA

More documents

Recommendations

Info

Iterative constructionsExercise 3.34. Create a program that reads an integer n from the keyboard and writes a matrixof n × n elements so that at each position (i, j) the value (i · n) + j is displayed if and only if it isan even number. Otherwise, the displayed value is 0. For example, if n = 5, the matrix is:□6 0 8 0 100 12 0 14 016 0 18 0 200 22 0 24 026 0 28 0 30In this exercise we also have to perform a discrimination based upon the values of i and j.Program 74: Exercise 3.34program c03e34;varn:integer;i,j:integer;beginwrite(’Please input the value of n: ’);readln(n);for i:=1 to n dobeginfor j:=1 to n doif (((i* N) +j) mod 2=0) thenwrite(’ ’,(i* N) +j:4,’ ’)elsewrite(’ ’);writelnendend.⊡Exercise 3.35. Create a program that reads an integer n from the keyboard and writes a matrixof n × n elements such as1 2 3 . . . N − 1 N2 . . . N − 13 . . . N − 2. . . . . . . . . . . . . . . . . .N − 1 . . . 2N N − 1 N − 2 . . . 2 1□There exist now four configurations of i and j for which we need to display a value. Hence,we nested if-else-if structure within the iteration.Program 75: Exercise 3.35program c03e35;varn:integer;i,j:integer;beginwrite(’Please input the value of n: ’);readln(n);63
A Practical Introduction to Pascal Programming Languagefor i:=1 to n dobeginfor j:=1 to n doif (i=1) then(* first row *)write(’ ’,j:3,’ ’)else if (i=n) then(* last row *)write(’ ’,n-j+1:3,’ ’)else if (j=1) then(* first column *)write(’ ’,i:3,’ ’)else if (j=n) then(* last column *)write(’ ’,n-i+1:3,’ ’)elsewrite(’ ’);writelnendend.⊡64
Page 4:
A Practical Introduction to Pascal
Page 8:
ContentsIntroduction to this book 9
Page 11 and 12:
Guidelines and structureThis book i
Page 13 and 14: A Practical Introduction to Pascal
Page 63: A Practical Introduction to Pascal
Page 91: A Practical Introduction to Pascal
show all

A practical introduction to Pascal programming language - GIARA

You also want an ePaper? Increase the reach of your titles

Delete template?

Save as template?