Матрицы и табулирование функций Опции

[Guest]

:molitva: Помогите, пожалуйста, решить задачу, это очень срочно!
Получить [Aij] i=1,...,10-целочисленную матрицу для j=1,...,12, в которой Aij=i+2j.

[klem4]

Если я правельно понял условие, то вот так :

Код

program TabF;
uses crt;
var b,a,x:extended;

Begin
  readln(x);
  a:=0;
  while a<=5 do
   begin
     b:=1- exp((-a/x));
     writeln('a=',a:1:1);
     writeln('b=',b:1:3);
     a:=a+0.5;
   end;

  repeat
   keypressed
  until keypressed;

END.