Вы приобрели котёнка. каждый вечер вы определяете его вес с весов. как можно описать на паскале массив, в котором будут храниться значения веса котёнка в течение месяца(например, мая)? ,напишите программу попроще.

см файл

за январь нет оплаты так как нет предыдущих показаний

excel таблицы не прикрепляются

1)

s : = 0;

for i : = 1 to k do

begin

  if i mod 2 < > 0 then

      s: = s + i;

end;

2)

for i : = 5 to 55 do

begin

  if i mod 2 < > 0 then

      writeln(i);

end;

3)

s : = 1;

for i : = n to m do

begin

  s: = s * i;

end;

4)

s : = 0;

for i : = 10 to 15 do

begin

        s: = s + i;

end;

обрамления там везде одинаковые

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

var

s,s1: real;

k: integer;

begin

s: =10;

k: =1;

while s< 20 do

begin

s: =s*1.1;

k: =k+1;

end;

writeln('в ', k,' день он пробежит 20 км');

s: =10;

s1: =10;

k: =1;

while s< 200 do

begin

s: =s+s1*1.1;

s1: =s1*1.1;

k: =k+1;

end;

writeln('в ', k,' день суммарный пробег превысит 200 км');

end.