В магазине продается костюмная ткань. Ее цена В руб. за квадратный метр. Составьте алгоритм и программу, которая подсчитает и выведет на экран стоимость куска этой ткани длиной Х метров и шириной 80 см.Паскаль блок схема
Program chik; const n=15; var P:array[1..15]of real; i:integer; s:real; begin s:=0; for i:=1 to n do begin read(p[i]); if(i mod 2=0)and(p[i]<0)then s:=s+p[i]; end; writeln(s); end. 2) program gt; uses crt,graphabc; const n=7; var mac1,mac2,mac3:array[1..15]of real; i,k1,k2:integer; begin k1:=0;k2:=0; for i:=1 to n do begin read(mac1[i]); if(mac1[i]>0)then begin Inc(k1); mac2[k1]:=mac1[i]; end; if(mac1[i]<0)then begin Inc(k2); mac3[k2]:=mac1[i]; end; end; for i:=1 to n do write(mac1[i],' '); writeln; for i:=1 to k1 do write(mac2[i],' '); writeln; for i:=1 to k2 do write(mac3[i],' '); end.
Существует два основных вида компьютерной графики - векторная и растровая. растровый рисунок представляет из себя сетку пикселей, разность цветов этих пикселей образует графический образ, воспринимаемый человеческим глазом как единая картина. векторный же рисунок состоит из отдельных сущностей: линии, многоугольники, эллипсы и т.п. фигуры, отрисовкой этих фигур попиксельно занимается просмотрщик изображения (например браузер). основным преимуществом векторного рисунка является то, что такой рисунок может как угодно трансформироваться и масштабироваться без потери качества. каждая фигура перед выводом на экран рассчитывается по формулам и может быть перерисована (перерассчитана) за доли секунды, если это потребуется. естественно, это дает преимущество и в конечном размере файла, так как нет необходимости описывать каждый пиксель, все пиксели отрисовываются, исходя из инструкций. однако в векторном формате можно создавать лишь достаточно примитивные изображения. представьте себе красочную фотографию, где присутствует пляж, закат, пальмы, туристы, птицы. представили? а теперь подумайте, сколько нужно усилий, чтобы эту фотографию сделать из фигур, сколько формул применить, сколько маленьких участков залить цветом и каким образом реализовать плавный переход от синего моря до желтого пляжа. наверное, вам стало страшно, именно поэтому основным способом хранения для фотографий является растровый формат jpeg с большой степенью сжатия. вектор идеально подходит для создания схем, простых образов без сложного перехода цветов. векторное изображение: растровое изображение:растровое изображение пример сложной векторной графики: сложная векторная графика как видите, каждая из веток графики содержит свои плюсы и минусы. было бы глупо не найти способ объединить эти виды в единое целое, поэтому большинство форматов векторной графики сегодня позволяют смешивать себя с растровой графикой. растровая картинка в векторном формате является такой же единой сущностью, как и другие фигуры. например, в svg растровые картинки можно подключать из отдельного файла и выводить на любом участке холста.
const n=15;
var P:array[1..15]of real;
i:integer;
s:real;
begin
s:=0;
for i:=1 to n do
begin
read(p[i]);
if(i mod 2=0)and(p[i]<0)then s:=s+p[i];
end;
writeln(s);
end.
2)
program gt;
uses crt,graphabc;
const n=7;
var mac1,mac2,mac3:array[1..15]of real;
i,k1,k2:integer;
begin
k1:=0;k2:=0;
for i:=1 to n do
begin
read(mac1[i]);
if(mac1[i]>0)then begin
Inc(k1);
mac2[k1]:=mac1[i];
end;
if(mac1[i]<0)then begin
Inc(k2);
mac3[k2]:=mac1[i];
end;
end;
for i:=1 to n do
write(mac1[i],' ');
writeln;
for i:=1 to k1 do
write(mac2[i],' ');
writeln;
for i:=1 to k2 do
write(mac3[i],' ');
end.