How to work with FOT…TO by example

How to work with FOT…TO by example

To work with FOT…TO by example

Example:

program Welcome;

uses

Wincrt;

var

number:integer;

sqnumber:integer;

begin

for number:=4 to 9 do

begin

sqnumber:=number*number;

Writeln(number,' ',sqnumber)

end

end.

Output: