Write a procedure in Pascal that takes a parameter – a natural number N – and displays a line of N characters ‘-‘.

procedure LinePrn (N: integer); var i: integer; begin for i: = 1 to N do write (‘-‘); end; The procedure has one parameter “N”, it transfers how many characters should be displayed on the screen in a line. In the loop, the variable “i” counts values from “1” to the value of the procedure parameter “N”, and at each count, a ‘-‘ character is printed on the screen, thus drawing a line.

One of the components of a person's success in our time is receiving modern high-quality education, mastering the knowledge, skills and abilities necessary for life in society. A person today needs to study almost all his life, mastering everything new and new, acquiring the necessary professional qualities.