вторник, 26 юни 2018 г.

Конфигурация за ъпгрейд.

Ако имате старичка компютърна машина, а искате нов и бърз компютър Ви препоръчвам следните примерни компоненти:

С тях ще може да играете всички съвременни игри на 30 кадъра и резолюция поне 720p.

петък, 22 юни 2018 г.

Как да запишем звук от звуковата карта

Случвало ли Ви се е да искате определена песен от интернет да си я свалите и да я слушате на телефона например?
Каква е идеята:
1.) Да накараме компютъра да използва звуковата карта като звуков източник.
2.) Да запишем звукът, който възпроизвежда звуковата карта в звуков файл.

Промяната на звуковия поток е описана подробно в линка в горната статия.
За да запишете звуковия поток е достатъчно да използвате каквато и да е звукова програма.
 Важно е да изберете "Stereo Mix" ( Звуковата карта)  като източник на аудиото.
Друга много важна настройка е силата на звука. Ако не я направите, звукът, който записвате, ще е много слаб и тих.
Ето как става:
























За конвертиране на получения звуков файл в MP3  използвайте безплатната програма Format Factory.
Приятна работа!

четвъртък, 17 май 2018 г.

Използване на ИКТ в час по математика

Във връзката за сваляне има 3 програми, които са в помощ на математиците.
Програмите пресмятат:
1. Елементи на правоъгълен триъгълник.
2. Квадратно уравнение.
3. Питагорови тройки.


Програмата за намиране елементите на квадратно уравнение  е създадена самостоятелно от Даниел Василев от 9 "б" клас.
 Линк за сваляне на програмите:
ИКТ в час по математика

сряда, 25 април 2018 г.

Чертаене на правоъгълник в Pascal

    Program box;
    uses Crt;
    (*your procedure same as the procedure window in the crt unit...*)
    procedure draw(x1,y1,x2,y2:integer);
       (*local procedure line1*)
       procedure line1(a,b,c,e:integer);
       (*writes a - line to the screen*)
       (*a and b are the starting position*)
          begin
          gotoxy(a,b);
          while c <= e do begin
             inc(c,1);
             write(#196);
          end;
       end;(*end of line1*)
       (*local procedure line2*)
       (*this writes a | line to the screen*)
       procedure line2(a,b,c,e:integer);
       begin
            while c <= e do begin
                gotoxy(a,b);
                write(#179);
                inc(c,1);
                inc(b);
            end;
       end;(*end of line2*)
    begin
       gotoxy(x1,y1);(*upper left corner of the box*)
       write(#218);
       gotoxy(x2,y1);(*upper right corner of the box*)
       write(#191);
       (*let's go back to the upper left corner*)
       (*and concatenate the upper corners...*)
       line1(x1+1,y1,x1,x2-2);
       gotoxy(x2,y2);(*lower right corner of the box*)
       write(#217);
       gotoxy(x1,y2);(*lower left corner of the box*)
       write(#192);
       line1(x1+1,y2,x1,x2-2);(*concat the lower corners*)
       line2(x1,y1+1,y1,y2-2);(*concat the left sides of the box*)
       line2(x2,y1+1,y1,y2-2);(*and last,concat the right sides too*)
    end;
    begin
     clrscr;
     draw(5,1,20,20);
     readln;
    end.

понеделник, 16 април 2018 г.

Създаване на гугъл формуляри

Google Forms е безплатно приложение на Google, което се използва за създаване на онлайн формуляр (форма, проучване, анкета, викторина, въпросник и др.) или тест с цел да го изпратите на други хора, за да го попълнят в интернет. Вие получавате всички резултати в реално време он лайн, както и статистика за тях.






Може да използвате линка по-долу, който е отлично оформен и има добре обяснени в детайли възможностите на GOOGLE FORMS.


Упътване за създаване на GOOGLE FORMS ( гугъл формуляри) .

Източник: http://itsredstva.blogspot.bg

четвъртък, 12 април 2018 г.

БИБЛИОТЕЧНИ МОДУЛИ В ТУРБО ПАСКАЛ

Благодарим много на човека, създал този документ, който ще ни помогне да създаваме нови и по-интересни неща в Паскал. За целта е необходимо да кликнете на линка и да свалите документа, който е "pdf" файл.

БИБЛИОТЕЧНИ МОДУЛИ В ТУРБО ПАСКАЛ

Приятно четене, компилиране и дебъгване.

сряда, 28 март 2018 г.

Елементи на анимацията

Program Animation1;
Uses Crt;
 var y:string;
 Begin
      Repeat
      clrscr;
      textcolor(1);
       writeln('zdravei');
        delay(100);
     
       until   y='y';
End.

вторник, 27 март 2018 г.

Анимация в Паскал

Program Program3b_lesson4;

Uses Crt;

Label l1;

 var y:string;

 color1,gx,gy:Integer;


 Begin

             Color1 :=0;

            gx:=2;

            gy:=2 ;

            Repeat

           l1:    clrscr;

       textcolor(Color1);

       gotoxy(gx+1,gy-1);
       writeln(' 0');
       delay(100);
        gotoxy(gx,gy);

       writeln('<:)}');
       delay(100);
       gotoxy(gx+1,gy+1);
       writeln(' 0');
       delay(100);

          Color1:=Color1 +1;

          gx:=gx+1;

          gy:=gy+1;


         if gx=10 then

         begin

         Color1 :=0;

            gx:=10;

            gy:=10 ;


         repeat

         clrscr;

       textcolor(Color1);

       gotoxy(gx,gy);
         writeln(' 0');
       writeln('<:)}');
       writeln(' 0');


       delay(100);

          Color1:=Color1 +1;

          gx:=gx-1;

          gy:=gy-1;

          Until gx=2;

          end;

    if gx=1 then goto l1;



        until y='y';


End.

четвъртък, 22 март 2018 г.

БИБЛИОТЕЧНИ МОДУЛИ В ТУРБО ПАСКАЛ

 Здравейте. Следващата статия е възможна благодарение на Николай от 9Г. Той успя да намери този безценен документ, който може да ви бъде от полза при създаване на графични изображения в Паскал.

Библиотечни модули в Паскал.

Следващата кратка програма е базов пример за създаване на анимация в Паскал.

Program Animation1;
Uses Crt;
 var y:string;
 Begin
      Repeat
      clrscr;
      textcolor(0);
       writeln('zdravei');
        delay(100);
       clrscr;
      textcolor(1);
       writeln('zdravei');
        delay(100);
      clrscr;
      textcolor(2);
      writeln('zdravei');
          delay(100);

       until   y='y';
End.

вторник, 13 март 2018 г.

Създаване на динамичен уебсайт

 

 Настоящата статия има за цел да улесни използването на уеб платформата "Weebly.com". Тази платформа има широк набор от безплатни възможности и още повече платени такива. 

Стъпки от 1 до 4 са препоръчителни при използването на мобилни телефони или таблети. Това дава същата функционалност на работа като при настолен компютър. Сайтът може да се използва, с който и да било друг браузър.

 

1.Отваряте Google.

 

 

 





2. Избирате Chrome.

 

   

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

  

 

  3.Избирате трите точки горе в дясно на екранa.

 

 

 

 

 

 

 

 

4. Трябва да има отметка на „Заявка за настолни...“.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

5. Въвеждате в адресната лента WEEBLY.COM.

 

 

 

 

 

 

6.Избирате „WEBSITE“. 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

7.Избирате G+.

 

 

 

 

 

 

 

 

 

8. Въвеждате имейла си в гугъл и паролата си.

 

 

 

 

 

 

 

 

 

 

 

9. Разрешавате.

 

 

 

 

 

 

 

 

 

 

 

 

 

10. Избирате, как искате да изглежда сайта ви.

 

 

 

 

 

 

 

 

 

 

 

 

 

11. Избирате „Start Editing”.

 

 

 

 

 

 

 

 

 

 

12. Избирате името на сайта си като го написвате на ЛАТИНИЦА:

 

 

 

 

 

 

 

13. Избирате „SUBDOMAIN”.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

14. Съгласявате се с избирането на “Done”.

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

 

15.Публикувате уебсайта с избирането на „Publish“.

Възможно е да се наложи да повторите стъпка 14.

 

 

 

 

 

 

 

 

 

 

 

След като публикувате сайта си, вече започва същинската част по работата, която няма да се разглежда в тази статия. Справочно ще спомена само, че след всяка промяна на сайта трябва да  се избира "Publish", за да бъде видима промяната и в интернет, а не само в платформата на "Weebly.com".

понеделник, 5 март 2018 г.

Учител от Гана преподава информатика само с тебешир и черна дъска

Поради липсата на компютри в училището 33-годишният учител прави всичко възможно, за да предаде знание на децата, дори и това да означава, че трябва да пресъздава компютърни програми, разполагайки само с тебешир и черна дъска.

За повече информация посетете връзката по-долу:

Информатика с тебешир .

понеделник, 12 февруари 2018 г.

Прогресът - замени "Не мога" с Не, мога".

В петък беше нажежена обстановката.
Имаше прехвърчане на всякакви настроения.
Почти всеки се включи в изработването на гифчето.
Накрая целия клас активно подложи на гласуване 7 предложения.
Победител беше Гергана. 7 човека предпочетоха нейния вариант.

понеделник, 22 януари 2018 г.

Какво научихме през първи срок по И. Т.


   В настоящата статия ще припомня, през стъпките, които минахме заедно, за да станете дигитално грамотни млади хора.
    Първото, с което ви запознах, бяха компютърните части. За  целта заедно сглобявахме и разглобявахме един стар училищен компютър.
     Показах Ви процесора, "климатика на компютъра" ( както каза един ученик за охлаждането на процесора). Имахте възможност да сравните големината на твърдите дискове за настолни компютри и лаптопи. Разгледахте отблизо видео карта и рам паметта. Монтирахте захранването към дънната платка.


    След това Ви показах, как да създадете свой собствен
акаунт (профил) в гугъл. Тези, които имаха свои акаунти, но бяха забравили паролите си, следваха стъпките за възстановяване на забравена парола. Вариантите бяха два - чрез имейл или чрез телефонния Ви номер.



       После преминахме към създаването на блог чрез сайта Blogger. За него използвахте профилът в Гугъл. Беше необходимо само да изберете, какъв да е адресът на блога Ви и как да се казва. Избрахте и "Екранно име" - с какво име да се представите пред Вашите читатели.

      Създадохте и Вашата първа статия. В нея се научихте, как да добавяте снимки, видео клипове, линкове. Форматирахте я според Вашите предпочитания и вкус.

     Следващото предизвикателство беше да използвате гугъл диск. В него изпробвахме, как се качват файлове и как се споделят чрез линк или по имейл.
     Освен, че се поработихме здраво, доста се и забавлявахме, особено когато работихме всички заедно в един споделен текстов документ.
    Изпращането на имейл с прикачен файл беше предизвикателство за доста от вас. Това е важно умение, което ще използвате доста често в бъдеще, а не както до момента само с учебна цел. Именно и това е последната стъпка, която трябва да изпълните, за да получите желаната от вас "хубава оценка".
    За ваше удобство ще изброя отново списъчно темите, с които се занимавахме:
1. Части на компютъра.
2. Създаване на профил в гугъл.
3. Възстановяване на забравена парола.
4. Създаване на блог.
5. Писане на статия.
6. Вмъкване в статия на снимка, видео клип и линк за връзка.
7. Качване и споделяне на файлове в гугъл диск.
8. Работа в споделен файл.
9. Изпращане на имейл с прикачен файл.
10. Споделяне на статия по имейл.

Оценката се определя от три критерия - брой теми, брой използвани елементи, успешно изпратена статия по имейл:
0 т. - Липсва създадена статия в blogger.com.
1 т. - Има създадена статия в blogger.com. В статията са изброени някои от изброените теми.
2 т. - Има създадена статия в blogger.com. В статията са изброени всички 10 теми.
 ______________________________

0 т. - В статията липсват следните елементи: снимка, видео клип и линк за връзка.
1 т. - В статията липсват някои от следните елементи: снимка, видео клип и линк за връзка.
2 т. - В статията са налични и трите елемента: снимка, видео клип и линк за връзка. 


______________________________
0 т. - Статията не е споделена по имейл.
0 т. - Статята е споделена по имейл, но учителят не е получил имейла поради сгрешен имейл адрес в полето на получателя.
0 т. - Статията е споделена по имейл, но учителят не може да отвори статията поради грешно поставен линк към статията.
1 т. - Статията е споделена по имейл и линкът в нея се отваря коректно.


Скала за оценяване:
Отличен (6) - 5 т.
Мн. Добър (5) - 4 т.
Добър (4) - 3 т.
Среден (3) - 2 т.
Слаб (2) - 0 - 1 т.   

Имате право да използвате всичко в тази статия като материал за вашите.
Желая успех на всички!





сряда, 3 януари 2018 г.

program Sprite

program Sprite;
uses
  Crt, Graph;
var
  GraphDriver : integer;  { The Graphics device driver }
  GraphMode   : integer;  { The Graphics mode value }
  MaxX, MaxY  : word;     { The maximum resolution of the screen }
  ErrorCode   : integer;  { Reports any graphics errors }
  MaxColor    : word;     { The maximum color value available }
procedure Initialize;
{ Initialize graphics and report any errors that may occur }
var
  PathToDriver   : string;  { Stores the DOS path to *.BGI & *.CHR }
begin
    GraphDriver := VGA;
    GraphMode := VGAHi;
    PathToDriver := '';
    InitGraph(GraphDriver, GraphMode, PathToDriver);
    ErrorCode := GraphResult;             { preserve error return }
    if ErrorCode <> grOK then             { error? }
    begin
      Writeln('Graphics error: ', GraphErrorMsg(ErrorCode));
      Halt(1);                            { Some other error:
terminate }
    end;
  Randomize;                { init random number generator }
  MaxColor := GetMaxColor;  { Get the maximum allowable drawing color
}
  MaxX := GetMaxX;          { Get screen resolution values }
  MaxY := GetMaxY;
end; { Initialize }
procedure PutImagePlay;
{ Demonstrate the GetImage and PutImage commands }
const
  r  = 20;
  StartX = 100;
  StartY = 50;
var
  CurPort : ViewPortType;
procedure MoveSaucer(var X, Y : integer; Width, Height : integer);
var
  Step : integer;
begin
  Step := Random(2*r);
  if Odd(Step) then
    Step := -Step;
  X := X + Step;
  Step := Random(r);
  if Odd(Step) then
    Step := -Step;
  Y := Y + Step;
  { Make saucer bounce off viewport walls }
  with CurPort do
  begin
    if (x1 + X + Width - 1 > x2) then
      X := x2-x1 - Width + 1
    else
      if (X < 0) then
        X := 0;
    if (y1 + Y + Height - 1 > y2) then
      Y := y2-y1 - Height + 1
    else
      if (Y < 0) then
        Y := 0;
  end;
end; { MoveSaucer }
var
  Pausetime : word;
  Saucer    : pointer;
  Pos : array[1..2] of record
    X, Y       : integer;
    XOld, YOld : integer;
  end;
  ulx, uly  : word;
  lrx, lry  : word;
  Size      : word;
  I         : word;
begin
  { PaintScreen }
  SetViewPort(0, 0, MaxX, MaxY, ClipOn);
  ClearViewPort;
  GetViewSettings(CurPort);
  { DrawSaucer }
  Ellipse(StartX, StartY, 0, 360, r, (r div 3)+2);
  Ellipse(StartX, StartY-4, 190, 357, r, r div 3);
  Line(StartX+7, StartY-6, StartX+10, StartY-12);
  Circle(StartX+10, StartY-12, 2);
  Line(StartX-7, StartY-6, StartX-10, StartY-12);
  Circle(StartX-10, StartY-12, 2);
  SetFillStyle(SolidFill, MaxColor);
  FloodFill(StartX+1, StartY+4, GetColor);
  { ReadSaucerImage }
  ulx := StartX-(r+1);
  uly := StartY-14;
  lrx := StartX+(r+1);
  lry := StartY+(r div 3)+3;
  Size := ImageSize(ulx, uly, lrx, lry);
  GetMem(Saucer, Size);
  GetImage(ulx, uly, lrx, lry, Saucer^);
  PutImage(ulx, uly, Saucer^, XORput);               { erase image }
  { Plot some "stars" }
  for I := 1 to 1000 do
    PutPixel(Random(MaxX), Random(MaxY), Random(MaxColor));
  Pos[1].X := MaxX div 3;
  Pos[1].Y := MaxY div 2;
  Pos[2].X := MaxX div 3*2;
  Pos[2].Y := MaxY div 2;
  PauseTime := 70;
  { Move the saucer around }
  repeat
    SetVisualPage(0);
    SetActivePage(1);                                { double buffer }
    for I := 1 to 2 do                               { draw image }
      PutImage(Pos[I].X, Pos[I].Y, Saucer^, XORput);
    SetVisualPage(1);
    for I := 1 to 2 do begin
      Pos[I].XOld := Pos[I].X;
      Pos[I].YOld := Pos[I].Y;
    end;
    for I := 1 to 2 do                               { width/height }
      MoveSaucer(Pos[I].X, Pos[I].Y, lrx - ulx + 1, lry - uly + 1);
    Delay(PauseTime);
    for I := 1 to 2 do                               { erase image }
      PutImage(Pos[I].XOld, Pos[I].YOld, Saucer^, XORput);
  until KeyPressed;
  FreeMem(Saucer, size);
end; { PutImagePlay }
begin { program body }
  Initialize;
  PutImagePlay;
  CloseGraph;
end.

Gif анимация

В настоящата статия ще разгледаме, какво е гиф анимация, как се създава, какви приложения има. Но преди да се впуснем същината на темата нека изгледаме тези две кратки клипчета:


И за да бъде като приказка нека кажем, че...
Имало едно време един фотограф.Той обичал да снима и да прожектира снимките си пред публика. Един ден на този фотограф му хрумнало, че ако може да направи така, че снимките да се прожектират бързо една след друга, снимките му ще "оживеят". Така той създал първата кинокамера и поставил основите на кино индустрията.
В днешно време, много от киноманите слагат визуалните ефекти на първо място. Ако ефектите са станали страхотно, филмът се гледа дори само заради ефектите.
Пуснете си това кратко клипче.

То е създадено изцяло от компютърна анимация. Гиф анимацията е "прабабата" на съвременното кино. Тя е възникнала още със създаването на първата кинокамера и в последствие разпространените кинопроектори. Рисуваните анимационни филми са основани изцяло на "гиф" анимацията.
Анимацията е бързо последователно показване на образи на неподвижни елементи с цел създаване на илюзия за движение. Това е оптична илюзия, дължаща се на известното забавяне (зрителна персистенция) в обработката на образа, получен от зрителния апарат, от човешкия мозък. Най-често анимацията се прави с помощта на техниките на заснемане на видео и филми.
Всъщност ако трябва да сме точни по-горе изброените неща са смесица между исторически факти и добре звучаща история.
Всъщност GIF (Graphics Interchange Format) е графичен файлов формат използван широко в Интернет, когато трябва да се съхрани изображението на лого или малка анимация. Цветовата палитра на пикселите в едно изображение с формат GIF е ограничен до 256 цвята, което прави този формат неподходящ за съхраняване на фотоизображения. Разширението на файловете от този тип е .gif.
На практика GIF анимацията е възникнала чак след създаването на интернет!

Да разгледаме картинката по-долу.
На нея виждате червена точка, изобразена в различни състояния. Ако комбинираме тези изображения като "GIF-че", ще се получи тази анимация:












За да създаваме анимации ще използваме програмата "MS Paint", която е вградена в Windows. С нея ще създаваме кадрите за нашата анимация.
След това с програмата PhotoScape ще обединим създадените кадри в анимация, подобна на подскачащото топче. Приятна работа.



Използвани източници: Google, Wikipedia, YouTube.