Исполнитель муравей перемещается по полю, разделённому на клетки. размер поля 8x8, строки нумеруются числами, столбцы обозначаются буквами. муравей может выполнять команды движения: вверх n, вниз n, вправо n, влево n (где n — целое число от 1 до 7), перемещающие исполнителя на n клеток вверх, вниз, вправо или влево соответственно. запись повтори k раз команда1 команда2 командаз конец означает, что последовательность команд команда1 команда2 командаз повторится k раз. если на пути муравья встречается кубик с буквой, то он перемещает его по ходу движения. пусть, например, кубик с буквой о находится в клетке е6. если муравей выполнит команды вправо 2 вверх 2, то сам окажется в клетке е7, а кубик с буквой о в клетке е8. пусть муравей и кубики расположены так, как указано на рисунке. муравью был дан для исполнения следующий алгоритм: вниз 3 повтори 2 раз вправо 1 вверх 1 влево 1 какое слово будет написано в 6 строке после выполнения этого алгоритма? 1) ком 2) лом 3) дом 4) том

;:::;:::2

Var money, cost,summa : real;
count : integer;
 tovar: string;
begin writeln('Введите исходные данные: ');
  writeln('Какой товар вы покупаете? ');
 readln(tovar);
  writeln('По какой цене? ');
 readln(cost);
  writeln('Сколько штук? ');
 readln(count);
  summa := cost*count; writeln('Ваш товар - ', tovar, '. Стоимость покупки: ',summa:0:2);  writeln('Сколько денег даете? ');
 readln(money);
  if money=summa then writeln('свободен, под расчёт') else if money > summa then writeln('Ваша сдача: ', money-summa) else writeln('Нужно добавить: ', summa-money,. ');
 end.

// PascalABC.NET 3.2, сборка 1345 от 24.11.2016
// Внимание! Если программа не работает, обновите её версию!

begin
  Writeln(' x   x^2    x^3');
  for var i:=1 to 50 do Writeln(i:3,i*i:5,i*i*i:8);
end.

Результат
 x   x^2    x^3
  1    1       1
  2    4       8
  3    9      27
  4   16      64
  5   25     125
  6   36     216
  7   49     343
  8   64     512
  9   81     729
 10  100    1000
 11  121    1331
 12  144    1728
 13  169    2197
 14  196    2744
 15  225    3375
 16  256    4096
 17  289    4913
 18  324    5832
 19  361    6859
 20  400    8000
 21  441    9261
 22  484   10648
 23  529   12167
 24  576   13824
 25  625   15625
 26  676   17576
 27  729   19683
 28  784   21952
 29  841   24389
 30  900   27000
 31  961   29791
 32 1024   32768
 33 1089   35937
 34 1156   39304
 35 1225   42875
 36 1296   46656
 37 1369   50653
 38 1444   54872
 39 1521   59319
 40 1600   64000
 41 1681   68921
 42 1764   74088
 43 1849   79507
 44 1936   85184
 45 2025   91125
 46 2116   97336
 47 2209  103823
 48 2304  110592
 49 2401  117649
 50 2500  125000