Вывести и подсчитать сумму четных положительных чисел меньших 100. написать на паскале)

Var i,k: integer; begin k: =0; writeln('chetnue chisla < 100'); for i: =100 downto 1 do begin if((i mod 2)=0) then begin write(' ',i); k: =k+i; end; end; writeln; writeln('suma chetnux chisel',k); end.

Вцифровых вычислительных машинах наименьшим информационной величиной является бит, который вследствие применения двоичной системы счисления объединяется в байт (8 бит), в килобайт, мегабайт и т.д по принципу кратности степени числа с основанием  2. до широкого распространения цифровых эвм существовали еще и аналоговые вычислительные машины,  в которой каждому мгновенному значению переменной величины, участвующей в исходных соотношениях, ставится в соответствие мгновенное значение другой (машинной) величины, часто отличающейся от исходной природой и масштабным коэффициентом, понятия бита в тот момент не использовалось. 

1. нормы поведения и нравственные принципы одинаковы как в виртуальном, так и в реальном мире.2. незаконное копирование продуктов труда других людей (музыки, игр, программ и т.д.) считается плагиатом (умышленное присвоение авторства чужого произведения).3. не верьте всему, что в видите или читаете в интернете. при наличии сомнений в правдивости какой-то информации следует обратиться за советом к взрослым.4. нельзя сообщать другим пользователям интернета свою личную информацию (адрес, номер телефона, номер школы, любимые места для игр и т.5. если вы общаетесь в чатах, пользуетесь программами мгновенной передачи сообщений, играете в сетевые игры, занимаетесь в интернете чем- то, что требует указания идентификационного имени пользователя, тогда выберите это имя вместе со взрослыми, чтобы убедиться, что оно не содержит никакой личной информации.6. интернет-друзья могут на самом деле быть не теми, за кого они себя , поэтому вы не должны встречаться с интернет-друзьями лично.7. нельзя открывать файлы, присланные от неизвестных вам людей. эти файлы могут содержать вирусы или фото/видео с нежелательным содержанием.8. научитесь доверять интуиции. если что-нибудь в интернете будет вызывать у вас психологический дискомфорт, поделитесь своими впечатлениями с взрослыми.