Для того, чтобы последовательность была возрастающей, для каждого очередного элемента new и предыдущего old должно выполняться условие new > old. Любое нарушение данного условия приводит к тому, что последовательность не может быть возрастающей.
Program Sequence;
var old, new : real;
f : boolean;
begin
ответ:
номер 1-интернет - всемирная паутина, которая хранит в себе тонны информации. он заменяет нам любой источник информации и облегчает понимание.
газеты/журналы - письменные, или же стандартные способы получения информации на бумаге.
телевидение - самый удобный источник информации. содержит в себе и картинку, и звук, и приятную визуализацию.
постеры/афиши - бумажки расклеенные по городу или же огромные постеры размещенные на зданиях. привлекает внимание, тем самым увеличивает число интересующихся.
радио - звуковая информация, уже перестает быть актуальной. в основном, радио - это не новости, а что-то более развлекательное.
номер 2-к примеру, кто-то описывает картину на бумаге (повествованием), тем самым переводит графическую информацию в текстовую. рассказывает вслух - уже в звуковую. и т. д.
номер 3-написание дипломного проекта из своего же курсового, время прошло законы изменились и теперь за одни и теже административные проступки другие наказания, но дабы не писать с нуля все это лучше обработать свой же курсовик соответственно изменив его содержание
номер 4-молекула днк
оптические носители
египитские папирусы
бумага
Const
g = 9.8;
Var
r,a,d:real;
Begin
ClrScr;
Write('r = ');ReadLn(r);
Write('a = ');ReadLn(a);
d:=g/(Pi*(r*r-a*a));
WriteLn('d = ',d);
ReadLn
End.