Delphi 7 is still used in schools ??? Really ?
1. What's wrong with LAZARUS?
2. What's wrong with INC?
PROGRAM WhatIsWrongWithInc;
USES
SysUtils;
VAR
i, p, m, n, c: Integer;
BEGIN
i:= 0;
p:= 0;
m:= 100;
n:= 50;
Repeat
Inc(i);
Inc(p);
Until (i > n) And (p > m);
c:= m*n;
WriteLn(i);
WriteLn(p);
WriteLn(c);
ReadLn;
END.