Паскаль срочно плиз!!!! Надо про писать через for умножать 2 от 1 до 9

1

Ответы и объяснения

2014-03-19T11:24:24+00:00
Program asd;
USES crt;
Const n=9;
      m=2;
VAR A:array[1..n] of integer;
i,p:byte;
BEGIN
For i:=1 to n do
 begin
 P:=I*m;
 Writeln(m,' * ',i,' = ',p);
 end;
END.