npdialog66
?>

Каким преимуществом обладают программы 2D графики по сравнению с рисунком, выполненным от руки?

Информатика

Ответы

dushechkin2

2д графика состоит и пикселей и она менее требовательная и легкая по создаваемости. а рисунки зделанные от руки более требовательны и трудны по создоваемости

dima-a
Снежинка типа

uses graphabc;
var a:array[1..5] of record x,y,x0,y0,g:real; end; i,c:integer;
begin
setwindowsize(800,600);
setpenwidth(2);
a[1].x:=400+150*cos(a[1].g/180*pi);
a[1].y:=300+150*sin(a[1].g/180*pi);
a[1].x0:=a[1].x;
a[1].y0:=a[1].y;
a[1].g:=a[1].g+1-(trunc(a[1].g) div 360)*360;
for i:=2 to 5 do begin
a[i].x:=a[i-1].x+150*power(0.65,i)*cos(a[i].g/180*pi);
a[i].y:=a[i-1].y+150*power(0.65,i)*sin(a[i].g/180*pi);
a[i].x0:=a[i].x;
a[i].y0:=a[i].y;
a[i].g:=a[i].g+power(10,i-1)-(trunc(a[i].g) div 360)*360;
end;
for c:=1 to 360 do
begin
a[1].x:=400+150*cos(a[1].g/180*pi);
a[1].y:=300+150*sin(a[1].g/180*pi);
line(round(a[1].x0),round(a[1].y0),round(a[1].x),round(a[1].y));
a[1].x0:=a[1].x;
a[1].y0:=a[1].y;
a[1].g:=a[1].g+1-(trunc(a[1].g) div 360)*360;
for i:=2 to 5 do begin
a[i].x:=a[i-1].x+150*power(0.65,i)*cos(a[i].g/180*pi);
a[i].y:=a[i-1].y+150*power(0.65,i)*sin(a[i].g/180*pi);
line(round(a[i].x0),round(a[i].y0),round(a[i].x),round(a[i].y));
a[i].x0:=a[i].x;
a[i].y0:=a[i].y;
a[i].g:=a[i].g+power(10,i-1)-(trunc(a[i].g) div 360)*360;
end;
end;
end.
david-arustamyan1
Type  str = array [1..100] of char;
var  maxs, tmps : str; 
count, max, tmp, ctmp : integer;

procedure reads (var s : str; var len, val : integer);
var 
b : boolean; 
 c : char; 
 i : integer;
begin 
 i := 0; b := false; 
 repeat 
  read (c); 
  if not b or (c <> ' ') then   
begin   
   if c = ' ' then b := true; 
    inc (i);   
   s[i] := c; 
    c := '1'; 
  end; 
 until b and (c = ' ');
  len := i; 
 readln (val);
end;
begin
assign (input, 'input.txt'); reset (input);
  reads (maxs, count, max); 
 while not eof do 
 begin   
 reads (tmps, ctmp, tmp);
    if tmp > max then   
 begin     
 max := tmp;
 count := ctmp; 
 maxs := tmps;
    end; 
end; 
 for tmp := 1 to count do write (maxs[tmp]);
end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Каким преимуществом обладают программы 2D графики по сравнению с рисунком, выполненным от руки?
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

maglevanyycpt
orgot9
osirparts7854
svetavalera
SEMENOV25352
Stenenko
evsmorodina
nevasoundmsk36
yurassolo747
yusliva
lenapopovich556510
nsmmkrtchyan
yuip2008
ilyagenius
margo929