Python, по введенным значениям n, m (1 ≤ n ≤ 20, 1 ≤ m ≤ 20) заполните массив размерностью n × m числами от 1 до mn, расположив их по спирали, закрученной по часовой стрелке, так, как показано в примере. примеры входные данные 4 4 выходные данные 1 2 3 4 12 13 14 5 11 16 15 6 10 9 8 7

сейчас сундуков-n1

прибавляется-n2

18+(k-n1): n2

ответ: 18+(к-n1): n2 лет будет невесте.

по у кощея 27360 сундуков, каждый год прибавляется по 33 сундука, василиса пообещала, что выйдет замуж за кощея когда у него будет 30000 сундуковс золотом.

решение: сейчас сундуков 27360

прибавляется по 33 в год, значит

18+(30000-27360): 33=18+2640: 33=18+80=98 лет

невесте будет 98 лет.

var i,s,p: integer; a: array [1..100] of integer;

begin 

s: =0; p: =0;

writeln('vvedite masiv a: ');  

for i: =1 to 10 do begin

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

readln(a[i]);

end;

for i: =1 to 10 do begin

if a[i]> 0 then s: =s+a[i];  

end;

s: =s*2;

writeln('udvoennaya suma polozhitelnih elementov=',s);

writeln('indexi elementov kotorie bolshe prediduschego: ');

writeln;

for i: =2 to 10 do begin

if a[i]> a[i-1] then write(i,', ');

end;

for i: =2 to 10 do begin

if ((a[i]> =0) and (a[i-1]> =0)) or ((a[i]< 0) and (a[i-1]< 0)) then p: =p+1;

end;

writeln;

if p> 0 then writeln('masiv imeet pari sosednih elementov s odnakovimi znakami') else   writeln('masiv ne imeet pari sosednih elementov s odnakovimi znakami');  

readln(s);

end. 

однажды один информатик сидел перед компьютером. а надо сказать, что информатик – это человек будущего, т.е.ребенок. и этому человеку необходимо было сделать слишком много уроков. он долго печатал, устал и захотел отдохнуть. воспользовавшись отсутствием родителей (что бывает достаточно редко), пронырливый информатик решил запустить самую убойную игру. самую – самую, которую родители обещали «удалить». информатик так увлекся, что сам оказался в компьютере, в той самой игре. но что-то ему эта игра быстро разонравилась, когда он оказался внутри ее. здесь грохотали пушки, летали самолеты, ездили танки и надо было быстро реагировать, если ты хочешь остаться в живых. информатику страшно захотелось выйти из игры, для этого ему надо было найти дверь с надписью «выход». о счастье, что он знал, все короткие пути и лазейки в этой игре. из игры он выбрался, но куда же он попал? он увидел большую улицу и много человечков, которые возили тележки с информацией. эти человечки беспрестанно толкали его. они были похожи друг на друга, но один привлек его внимание, т.к. явно был главным. он был самым высоким и имел отличающую его от всех надпись: «проводник». информатик обратился к нему и просил объяснить, где он находится. на что проводник ответил, что это главная улица worda. человечки продолжали суетиться, а информатик разглядывал с любопытством город. неожиданно он заметил, что в тени ползет какое –то существо, похожее на огромную гусеницу. она проползла и легла посередине тротуара. один из работников с тележкой споткнулся об нее, тележка перевернулась, а информация высыпалась. гусеница шустро поползла к рассыпавшимся буквам и начала их надкусывать (ибо! что не съем, то надкушу). увидев это, проводник достал мобильный телефон, набрал вызвал скорую . не прошло и несколько секунд как на реактивном моторе примчалась машина с надписью антивирус. из машины вылезли человечки в белых халатах, сделали ей успокоительный укол. затем посадили в машину и отправили в корзину. вот и сказке конец, а кто слушал – !

var x1,x2,x3,x4,x5: integer;

s: real;

begin

  read(x1,x2,x3,x4,x5);

  s: = (x1+x2+x3)/(x4+x5);

  if round(s)=s then writeln("celoe - "s);

end.