Еда напитки всего
бутер
кофе 2
пряник
плюшка 4
сок 2
кекс
Векторные рисунки используются для хранения высокоточных графических объектов(рисунков,чертежей и схем),для которых имеет значение сохранение чётких и ясных контуров.Векторные рисунки формируются из графических объектов(линия,прямоугольник,окружность),для каждого из которых задаются координаты опорных точек(например,для рисования окружности достаточно знать координаты её центра и радиус) и формулы рисования объекта.Для каждого объекта можно также указать цвет,толщину и стиль линии(сплошная,пунктирная и т.д.)его контура.екторные рисунки формируются из базовых графических объектов,для каждого из которых задаются координаты опорных точек,формулы рисования объекта,а также цвет,толщина и стиль линии его контура.остоиинством векторной графики является то,что векторные рисунки могут быть увеличены или уменьшены без потери качества .Это возможно,так как изменение размера рисунка производится с помощью простого умножения координат точек графических объектов на коэффициент масштабирования.Другое достоинство векторной графики - небольшой информационный объём файлов,содержащих растровые изображения.Векторная графика лежит в основе flash-анимации, популярной в настоящее время технологии создания анимации.Эта технология позволяет реализовать движение,плавно изменяя расположение,размер и цвет объектов на рисунке,а также показать плавное превращение одного объектв в другой.
Program mas;
const n=4; // число элементов
var a: array [1..n] of integer; //массив
i, sum: integer; //переменные
begin //начало
sum:=0; // сумма=0
for i:=1 to n do readln(a[i]); //вводим массив
for i:=1 to n do //цикл
if(a[i] mod 2 <>0) then //условие нечетности
begin
writeln(a[i]); //выводим нечетные
sum:=sum+a[i]; //считаем сумму
end;
writeln(sum); //выводим сумму
end. //конец
1. Маркированные списки оформляются с помощью маркеров. Они могут быть разной формы. Нумерованные списки оформляются при помощи арабских или римских цифр.
2. Если работаете в Microsoft Office, то в меню Главная есть 2 кнопки (нумерованный список и маркированный)
3. Ввод завершается двойным нажатием клавиши Enter
Var
A:integer;
Begin
Write(A);Read(A);
if (A>9)and(A<100) then Write('А - двузначное')
else Write('А - не двузначное')
End.
