Какое число будет выведено на экран в результате выполнения этого цикла? i = 3
print ( "9", end="" )
while i < 6:
print ( i, end="" )
i += 1

Записывайте: Если это для уроков в школе нужно - то это подойдет: 
Салат Оливье. 
Ингредиенты 
1 баночка зеленого горошка (400г) 
300 г мяса 
4 яйца 
350 г картофеля 
100 г соленых или маринованных огурцов 
150 г лука 
соль 
майонез 
Алгоритм приготовления: 
1.Мясо отварить до готовности (варить около 40 минут после закипания) . 
2.Остудить. 
3.Лук мелко покрошить. 
4.Залить его кипятком и оставить на 10 минут, затем воду слить, лук промыть в холодной воде. 
5.Мясо нарезать кубиками. 
6.Картофель почистить, нарезать кубиками. 
7. Яйца мелко покрошить. 
8.Огурцы мелко нарезать. 
9.Смешать картофель, мясо, лук, горошек (воду слить) , яйца, огурцы. 
10.Посолить. 
11. Заправить майонезом. 
12. Украсить по вкусу, например зеленым горошком 

Это?

ответ:

uses crt;

var a: array[1..20,1..20] of real;

    n,m,i,j: integer;

    s: real;

begin

    clrscr; randomize;

    write('введите кол-во строк: '); readln(n);

    write('введите кол-во столбцов: '); readln(m);

    for i: =1 to n do

    begin

      for j: =1 to m do

      begin

        a[i,j]: =random(100)/10;

        write(a[i,j]: 4: 1);

      end;

      writeln;

    end;

    for i: =1 to n do

    begin

      s: =0;

      for j: =1 to m do

      s: =s+a[i,j];

      writeln('сумма ',i,'-ой строки: ',s: 0: 1);

    end;

    for j: =1 to m do

    begin

      s: =0;

      for i: =1 to n do

      s: =s+a[i,j];

      writeln('сумма ',j,'-ого столбца: ',s: 0: 1);

    end;

    for j: =1 to m do

    begin

      s: =0;

      if j mod 2 = 0 then  

      begin

        for i: =1 to n do

        s: =s+a[i,j];

        writeln('среднее арифметическое ',j,'-ого столбца: ',s/m: 0: 1);

      end;

    end;

    readln;

end.

объяснение: