Составить программу на языке паскаль s=2+4++n

Var   i,n,s: longint; begin   write('введите четное значение последнего члена ряда: ');   readln(n);   s: =0;   for i: =1 to n div 2 do s: =s+2*i;   writeln('сумма членов ряда равна ',s) end. тестовое решение: введите четное значение последнего члена ряда: 50 сумма членов ряда равна 650

Var s, i, n: integer; begin read(n); i: =2; write('s = '); while (i< =n) do begin s: =s+i; i: =i+2; end; writeln(s); end.

Её изобрёл дуглас карл энгельбарт из стэнфордского исследовательского института. первая мышь выглядела как деревянная коробочка, которая перемещалась по столу на колёсиках, отсчитывая их обороты и развороты. затем эта информация вводилась в компьютер и перемещением курсора на экране. энгельбарт не может припомнить, кому принадлежит авторское право на название устройства: "устройство выглядело как мышь с хвостом, и мы все в лаборатории его так и называли".  отметим, что энгельбарт работал над созданием манипулятора не один: он является автором идеи и разработчиком концепции, но само устройство сделал не он. первая мышь была сделана руками аспиранта по имени билл инглиш (bill english), а присоединившийся позднее джеф рулифсон (jeff rulifson) существенно улучшил конструкцию мыши и разработал для неё программное обеспечение. в архивах стэнфордского университета хранится учебный фильм 1968 года, в котором демонстрируется первая компьютерная мышь и её потрясающие для того времени возможности. сейчас дуглас энгельбарт мог бы быть богаче и известней билла гейтса, но он сознательно "ушёл в тень" и о нём мало кто вспоминает. в 68-м он получил от работодателей за своё изобретение чек на $10 тысяч и весь гонорар внёс в качестве первого вклада за скромный загородный домик.