uses Drawman;
begin
Field(22,6);
onvector(3,5);
pendown;
onvector(-2,0);
onvector(0,-4);
onvector(2,0);
onvector(0,2);
onvector(-2,0);
penup;
onvector(3,-2);
pendown;
onvector(1,4);
onvector(1,-4);
penup;
onvector(-2,2);
pendown;
onvector(2,0);
penup;
onvector(1,-2);
pendown;
onvector(0,4);
onvector(2,0);
onvector(0,-2);
onvector(-2,0);
penup;
onvector(3,-2);
pendown;
onvector(1,4);
onvector(1,-4);
penup;
onvector(-2,2);
pendown;
onvector(2,0);
penup;
onvector(3,2);
pendown;
onvector(-2,0);
onvector(0,-4);
onvector(2,0);
onvector(0,2);
onvector(-2,0);
penup;
onvector(3,-2);
pendown;
onvector(1,4);
onvector(1,-4);
penup;
onvector(-2,2);
pendown;
onvector(2,0);
penup;
onvector(1,2);
pendown;
onvector(0,-4);
penup;
onvector(2,4);
pendown;
onvector(0,-4);
penup;
onvector(0,2);
pendown;
onvector(-2,0);
penup;
onvector(-19,-3);
end.
uses Drawman;
begin
Field(22,6);
onvector(3,5);
pendown;
onvector(-2,0);
onvector(0,-4);
onvector(2,0);
onvector(0,2);
onvector(-2,0);
penup;
onvector(3,-2);
pendown;
onvector(1,4);
onvector(1,-4);
penup;
onvector(-2,2);
pendown;
onvector(2,0);
penup;
onvector(1,-2);
pendown;
onvector(0,4);
onvector(2,0);
onvector(0,-2);
onvector(-2,0);
penup;
onvector(3,-2);
pendown;
onvector(1,4);
onvector(1,-4);
penup;
onvector(-2,2);
pendown;
onvector(2,0);
penup;
onvector(3,2);
pendown;
onvector(-2,0);
onvector(0,-4);
onvector(2,0);
onvector(0,2);
onvector(-2,0);
penup;
onvector(3,-2);
pendown;
onvector(1,4);
onvector(1,-4);
penup;
onvector(-2,2);
pendown;
onvector(2,0);
penup;
onvector(1,2);
pendown;
onvector(0,-4);
penup;
onvector(2,4);
pendown;
onvector(0,-4);
penup;
onvector(0,2);
pendown;
onvector(-2,0);
penup;
onvector(-19,-3);
end.
1: 0;
2: 4;
Объяснение:
оператор div вычисляет целую часть от деления, mod- остаток =>
768 div 100 = 7; 7 mod 10 = 0;
340 div 10 = 34; 34 mod 10 = 4;