Даны два числа n и m. создайте двумерный массив a[n][m], заполните его таблицей умножения a[i][j]=i*j и выведите на экран. при этом нельзя использовать вложенные циклы, все заполнение массива должно производиться одним циклом.

Вроде ! program project4 {$apptype console}  uses        sysutils;         var  a: array[0..100,0..100]of integer;   i,j,n,m: integer;   begin  read(n,m);   i: =0; j: =-1;   while i< n do begin  a[i,j]: =i*j;   inc(j);   if j> =m then  begin j: =0; inc(i);   end;   end;   for i: =0 to n-1 do begin      for j: =0 to m-1 do        write(a[i,j],' ');         writeln;         end;       readln;       readln;   end.

Для решения этой отбросим лишнее и оставим только данные нам факты: 1.юре не хватает времени на туризм -> юра не турист. 2. врач сказал,что разделает увлечение сестры юры -> врач - турист. 3. у двух друзей нет нет букв из их имени ни в профессии, ни в увлечении. начнем с тимура.буквы из его имени есть во всех профессиях,значит к факту №3 он не относится. возьмем юру. если учитывать факт №3, то из увлечений ему подходит только бег, а из профессий - . влад же у нас получается ,следуя факту №3 , юрист, увлечение которого - регби. тогда тимур у нас является врачом, который увлекается туризмом. решение верное,так как ни один из фактов не нарушен. ответ: влад - юрист - регби             тимур - врач - туризм             юра - - бег

Алгоритм квадрат     {   покажись;   опусти_перо;       вперед ( 50 );       вправо ( 90 );       вперед ( 50 );       вправо ( 90 );       вперед ( 50 );       вправо ( 90 );       вперед ( 50 );       вправо ( 90 );           }алгоритм звездочки      повторить 18 {       вперед 200       налево 100       } алгоритм звезды    {  вперед ( 60 );   налево ( 10 );   опусти_перо;   цикл (10);   налево ( 144 ); вперед  ( 120 ); конец_цикла; поднять_перо; направо(18); назад(60);   }