Блог учителям информатики Беларуси, учащимся, учителям, использующих ИКТ. Всем, кто хочет идти в ногу со временем, быть конкурентноспособными на рынке труда
Взять 40 вычесть 10 получим 30, потом из 10 вычтем 1 получим месяц и после остаётся 1.Итого:30.09.01
Илья, твоя идея интересна. Но, его надо составить на Паскале.
program PR3;uses Drawman;beginField(19,3);ToPoint(1,1);pendown;ToPoint(2,2);ToPoint(2,0);penup;ToPoint(3,0);pendown;ToPoint(4,0);ToPoint(4,2);ToPoint(3,2);ToPoint(3,1);ToPoint(4,1);penup;ToPoint(7,0);pendown;ToPoint(7,2);ToPoint(6,1);penup;ToPoint(8,1);pendown;ToPoint(9,2);ToPoint(9,0);penup;ToPoint(12,0);pendown;ToPoint(11,0);ToPoint(11,1);ToPoint(12,1);ToPoint(12,2);ToPoint(11,2);penup;ToPoint(13,0);pendown;ToPoint(14,0);ToPoint(14,2);ToPoint(13,2);ToPoint(13,0);penup;ToPoint(15,0);pendown;ToPoint(16,0);ToPoint(16,2);ToPoint(15,2);ToPoint(15,0);penup;ToPoint(18,0);pendown;ToPoint(18,2);ToPoint(17,1);end.юра миронов 6б
uses drawman;beginfield(35,10);topoint(2,8);pendown;topoint(5,8);topoint(5,6);topoint(2,6);topoint(2,4);topoint(5,4);penup;topoint(7,8);pendown;topoint(7,6);topoint(9,6);topoint(9,4);penup;topoint(9,6);pendown;topoint(9,8);penup;topoint(14,4);pendown;topoint(14,8);topoint(17,8);topoint(17,4);topoint(14,4);penup;topoint(19,8);pendown;topoint(19,6);topoint(21,6);topoint(21,4);penup;topoint(21,6);pendown;topoint(21,8);penup;topoint(26,4);pendown;topoint(26,8);topoint(29,8);topoint(29,4);topoint(26,4);penup;topoint(31,8);pendown;topoint(34,8);topoint(34,6);topoint(31,6);topoint(31,4);topoint(34,4);end.Мозоль Роман 6 "Б"
Взять 40 вычесть 10 получим 30, потом из 10 вычтем 1 получим месяц и после остаётся 1.Итого:30.09.01
ОтветитьУдалитьИлья, твоя идея интересна. Но, его надо составить на Паскале.
Удалитьprogram PR3;
ОтветитьУдалитьuses Drawman;
begin
Field(19,3);
ToPoint(1,1);
pendown;
ToPoint(2,2);
ToPoint(2,0);
penup;
ToPoint(3,0);
pendown;
ToPoint(4,0);
ToPoint(4,2);
ToPoint(3,2);
ToPoint(3,1);
ToPoint(4,1);
penup;
ToPoint(7,0);
pendown;
ToPoint(7,2);
ToPoint(6,1);
penup;
ToPoint(8,1);
pendown;
ToPoint(9,2);
ToPoint(9,0);
penup;
ToPoint(12,0);
pendown;
ToPoint(11,0);
ToPoint(11,1);
ToPoint(12,1);
ToPoint(12,2);
ToPoint(11,2);
penup;
ToPoint(13,0);
pendown;
ToPoint(14,0);
ToPoint(14,2);
ToPoint(13,2);
ToPoint(13,0);
penup;
ToPoint(15,0);
pendown;
ToPoint(16,0);
ToPoint(16,2);
ToPoint(15,2);
ToPoint(15,0);
penup;
ToPoint(18,0);
pendown;
ToPoint(18,2);
ToPoint(17,1);
end.
юра миронов 6б
uses drawman;
ОтветитьУдалитьbegin
field(35,10);
topoint(2,8);
pendown;
topoint(5,8);
topoint(5,6);
topoint(2,6);
topoint(2,4);
topoint(5,4);
penup;
topoint(7,8);
pendown;
topoint(7,6);
topoint(9,6);
topoint(9,4);
penup;
topoint(9,6);
pendown;
topoint(9,8);
penup;
topoint(14,4);
pendown;
topoint(14,8);
topoint(17,8);
topoint(17,4);
topoint(14,4);
penup;
topoint(19,8);
pendown;
topoint(19,6);
topoint(21,6);
topoint(21,4);
penup;
topoint(21,6);
pendown;
topoint(21,8);
penup;
topoint(26,4);
pendown;
topoint(26,8);
topoint(29,8);
topoint(29,4);
topoint(26,4);
penup;
topoint(31,8);
pendown;
topoint(34,8);
topoint(34,6);
topoint(31,6);
topoint(31,4);
topoint(34,4);
end.
Мозоль Роман 6 "Б"