Распечатать в столбик таблицу умножения на 7 . Составить программу .
Program tablica; var i:integer; begin i:=1; while(i<=10)do <br>begin writeln('7*',i,'=',7*i); i:=i+1; end; end.