Информатика 8 класс проверьте если не так, напишите правильный ответ

2. из математики

1) чтобы сложить два числа с разными знаками нужно из большего слагаемого вычесть меньшее, и поставить тот знак который больше

примеры: -2+6=3

2)чтобы вычесть два числа с разными знаками нужно сложить их и поставить знак минус

-6-8=-14

из русского языка

1)Глаголы совершенного вида указывают на завершенность действия, его результат, конец действия или его начало. В неопределенной форме они отвечают на вопрос что сделать?. 
Например: добежать, купить, зазвенеть, построить, запеть. 

   В изъявительном наклонении глаголы обозначают действия, которые реально происходят, происходили или будут происходить:
пишу,     писал, написал,     буду писать, напишу.

У меня получилось вот что (смотри скриншоты листинга программы и результата работы этой программы):
uses Crt;
const n = 10;
var A: array [1..n] of integer; 
        i: integer;
begin 
ClrScr; 
Randomize; 
WriteLn ( ' Massiv I: '); 
for i:=1 to n do 
    begin     
          A[i] := 1+random(n);  
          Write (A[i]:4); 
    end; 
WriteLn; WriteLn ( ' Massiv II: '); 
for i:=1 to n do 
    begin   
           if (A[i] mod 2 =0) then A[i]:=0 else A[i]:=3*A[i];     
           Write (A[i]:4); 
   end;
ReadLn;
end.