Любое создание флеш баннеров для сайта начинается с написания сценария. В сценарии описывается используемые фразы и объекты и порядок их чередования. После утверждения сценария, начинается отрисовка всех используемых шрифтов и элементов. На основании разработанных эскизов элементов и подобранных эффектов, используемых в баннере, создается раскадровка баннера. На этой стадии можно просмотреть сюжетную линию анимации в картинках. После утверждения раскадровки наступает самый важный этап — этап анимации. Именно сейчас дизайнеру необходимо приложить все свое творческое начало и профессионализм. Каждому элементу необходимо придать одухотворенности и динамики. При этом очень важно не забыть о том, что все элементы должны двигаться гармонично и согласованно по отношению друг к другу. Самая главная задача аниматора заключается не только в компоновке элементов, а в придании баннеру привлекательности. Ведь задача баннера — привлечь клиента, чтобы клиент осуществил переход на сайт рекламируемого товара. Поэтому настоящий дизайнер должен быть не только профессионалом, но и иметь утонченный вкус и прекрасно разбираться в человеческой психологии, чтобы уметь всего в нескольких кадрах заинтересовать пользователя и перевести его в разряд клиента. В креативной дизайн студии Style-you работают только профессиональные аниматоры с богатым опытом работы. Баннеры для сайтов здесь разрабатываются для всех отраслей бизнеса. Ознакомиться с ценами на создание баннеров можно тут.
Program z1;
Uses Crt;
var a,i:integer;
p:longint;
begin
clrscr;
p:=1;
write('Введите число а: ');
readln(a);
for i:=a to 100 do
p:=p*a;
writeln('Произведение всех чисел от ',a,'до 100:',p);
readkey;
end.
Program z2;
Uses Crt;
var s,i:integer;
i:=2;s:=0;
while(i<=98) do
begin
s:=s+i;
i:=i+2;
end;
clrscr;
write('Сумма последовательности: ',s);
readkey;
end.
Program z3;
Uses Crt;
var a,i:integer;
begin
clrscr;
a:=0;
for i:=100 to 999 do
if ((i mod 5)=0 and (i mod 21)=0) then
a:=a+1;
write('Количество 3-значных чисел делящихся без остатка на 5 и 21: ',a);
readkey;
end.
Program z4;
Uses Crt;
var a,i,s:integer;
begin
clrscr;
s:=10:
write('Введите количество тренировочных дней: ');
readln(a);
for i:=2 to a do
s:=s+3;
write('Суммарное расстояние: ',s);
readkey;
end.
Program z5;
Uses Crt;
var a,i,n,s:integer;
begin
clrscr;
write('Введите количество отрядов: ');
readln(n);
s:=0;
for i:=1 to n do
begin
write('Введите количество детей в ',i ,'-м отряде:' );
readln(a);
clrscr;
s:=s+a;
end;
writeln;
writeln('Общее количество детей в лагере:',s);
readkey;
end.
