При изучении курса "Вывод текста на экран" мы писали программу, которая выводит на экран тетушку Сову. Сейчас Вам необходимо написать программу, которая по введенному с клавиатуры числу выведет соответствующее число сов.
Напоминаем, картинка тетушки Совы состоит из символов. Размер 5 на 11 символов.
:) \/ (:
{ (@)v(@) }
{ | ~- -~ | }
{ /^ ' ^ '^ \ }
===m-m===
Между двумя соседними Совами имеется пустой (из пробелов) столбец

Есть много вариантов, первый это ctrl + b, но он не поддерживает ввод. Поетому советую использовать SublimeRELP, установить его не так сложно воспользуйтесь Package Control -> Install Package -> SublimeRELP. Теперь ви можете Tools -> SublimeRELP -> Python -> Run Current file. Но это поддерживает только Python2.7 и пользоваться не удобно. Для того что бы исправить это все открываем Preferences -> Key Bindings -> User и добавляем такое:

{ "keys": ["ctrl+b"], "command": "repl_open",

"caption": "Python - RUN current file",

"id": "repl_python_run",

"mnemonic": "d",

"args": {

"type": "subprocess",

"encoding": "utf8",

"cmd": ["python3", "-u", "$file_basename"],

"cwd": "$file_path",

"syntax": "Packages/Python/Python.tmLanguage",

"external_id": "python",

"extend_env": {"PYTHONIOENCODING": "utf-8"}

}

}

(в квадратние скобки).

Теперь при Ctrl + b все должно работать.

Как то так получается

//Pascal ABC.NET v3.0 сборка 1111

Const
 s=5;

Var
 ar:array[1..s] of integer;
 n,m,i:integer;
begin
 writeln('N');
 readln(n);
 writeln('M');
 readln(m);
 writeln('Array:');
 for i:=1 to s do
   readln(ar[i]);
 writeln('First array:');
 for i:=1 to s do
  begin
   write(ar[i]:4);
   if ar[i] div n<>0 then ar[i]:=ar[i]+m;
  end;
 writeln;
 writeln('Final array:');
  for i:=1 to s do
   write(ar[i]:4);
end. 

Пример ввода:
3
3
1
2
3
4
5
Пример вывода:
First array:
   1   2   3   4   5
Final array:
   1   2   6   7   8

//Блок-схема во вложении