1.Вам необходимо создать таблицу. Таблице должна содержать
следующие столбцы: №п/п; Ф.И.О.; пол; должность; стаж работы; оклад;
телефон; адрес проживания.

2. Заполнить данную таблицу (20 строк).

3. Скопировать выполненную и заполненную таблицу и вставить ее ниже в
этом же файле. Добавить в вставленную таблицу еще 2 столбца (с любой
информацией) и заполнить строки этих столбцов, и добавить еще 5 строк
ко всей таблице и заполнить их.

4. Выполненное задание сохранить в файл и переслать по электронной
почте преподавателю Задачная формулировка.

1. Две таблицы в MS Word, одна состоящая из 8 столбцов и 20 строк, а
другая таблица, состоящая из 10 столбцов и 25 строк, Все строки таблиц
должны быть заполнены.

program gulkakh;

const n=5;

var a:array[1..n,1..n] of integer;   

i,j,k,max,stroka:integer;

begin

writeln('Исходная матрица:');

for i:=1 to n do   

for j:=1 to n do    begin   

 a[i,j]:=random(20)-10;   

 write(a[i,j],' ');   

  if j=n then writeln; 

  end;   

 stroka:=1;

max:=a[1,1];

for i:=1 to n do

for j:=1 to n do begin

if max<a[i,j] then begin

max:=a[i,j];

stroka:=i;

end;

end;

k:=n;

for i:=stroka to n-1 do

for j:=1 to n do

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

k:=k-1;

writeln('Без удаленной строки:');

for i:=1 to k do 

 for j:=1 to n do begin

  write(a[i,j],' '); 

if j=n then writeln; 

end;

end.

import locale

locale.setlocale(locale.LC_ALL, 'ru_RU.UTF-8')

myDate = datetime.today()

myMonth = myDate.strftime('%B')

Ещё можно вот так через функции:

def month_name(num, lang):

   en = ['january', 'february', 'march', 'april', 'may', 'june', 'july', 'august', 'september',

         'october', 'november', 'december']

   ru = ['январь', 'февраль', 'март', 'апрель', 'май', 'июнь', 'июль', 'август', 'сентябрь',

         'октябрь', 'ноябрь', 'декабрь']

   if lang == 'en':

       return en[num - 1]

   else:

       return ru[num - 1]

Объяснение: