Продумайте алгоритм решения задачи.Впишите соответствующие команды в блок-схемы.
Задача.Иван-царевич каждый день угощает царевну конфетами.В первый день он принес две,а затем каждый следующий день в два раза больше,чем в предыдущий.На какой по счету день ему пришлось угостить царевну больше 100 конфетами.
Пусть n-текущий день,k -количество конфет.
Новый год для меня - самый любимый и долгожданный праздник. В преддверие Нового года мною овладевает странное чувство, что должно случиться что-то волшебное и радостное. Повсюду атмосфера праздника, и люди готовятся к его приходу - покупают пышные ели домой, различные фрукты и сладости на стол, и конечно, подарки для своих близких. Для детей, Новый год - это настоящая сказка.
Накануне Нового года мы начинаем готовиться к его празднованию. Украшаем нашу елку и комнаты яркими гирляндами и игрушками, мишурой и разноцветными шарами. Квартира преображается, становится праздничной и еще более уютной.
Каждый год к праздничному столу мама готовит много всего вкусного и необычного. К нам в гости приходят близкие друзья и родственники. Все веселятся, поют и танцуют, участвуют в забавных конкурсах. Ближе к полуночи, выходим на улицу, запускаем салюты и любуемся красивым фейерверком. Повсюду слышны поздравления, восторг и радость от прихода Нового Года. А на утро, я с нетерпением бегу к елке, чтобы узнать какой же подарок мне подарили.
Уверен, что в этом году празднование Нового Года будет еще увлекательнее, а наступающий год принесет лишь счастье и радость!
// Внимание! Если программа не работает, обновите версию!
begin
var a:=ArrRandom(ReadInteger('n='),-50,50); a.Println;
a.Where((x,i)->i.IsOdd).Println; // для №1
Writeln('Сумма =',a.Where((x,i)->i.IsEven).Sum); // для №2
end.
Пример
n= 13
-2 33 -49 49 50 -48 -11 27 47 10 17 22 38
33 49 -48 27 10 22
Сумма =90
№3
begin
var a:=ArrRandom(15,-99,99); a.Println;
a[a.IndexMax]:=0; a.Println
end.
Пример
34 -62 -42 98 44 -56 9 -69 85 55 -86 -32 83 -94 -19
34 -62 -42 0 44 -56 9 -69 85 55 -86 -32 83 -94 -19