Напишите программу, которая в последовательности целых чисел находит сумму четных чисел в диапазоне от 5 до 25. программа получает на вход целые числа, количество введенных чисел неизвестно, последовательность чисел заканчивается числом 0 (0 - признак окончания ввода, не входит в последовательность количество чисел не превышает 1000. введенные числа по модулю не превышают 30000. программа должна вывести одно число: сумму четных чисел в диапазоне от 5 до 25. входные данные : 4, 16, 17, 26, 0 выходные данные: 16

program summa;

uses crt;

var s,n,c: integer;

 

  begin

    clrscr;

    write('введите числа коннц ввода 0: ');

    s: =0; c: =0;  

    repeat

        readln(n);

        c: =c+1;  

if (n mod 2)=0 then      if ((n> =5)and (n< =25)) then s: =s+n;          

  until (n=0) or (c=1000) ;    

write('сумма ',c,' чётных чисел в диапазоне от 5 до 25: ',s);

    readkey;

 

end. 

 

 

введение предложенное методическое пособие предназначено для организации работы по теме “моделирование” в рамках дисциплины “информационные технологии” для специальности 230103. оно включает в себя теоретические основы по основным разделам данной темы. содержит для самостоятельной работы студентов на уроке с целью закрепления полученных теоретических знаний. при выполнении практических работ доля самостоятельной деятельности студентов должна быть существенно выше, чем при других видах учебной работы; преподаватель в этой ситуации достаточно часто выступает в роли консультанта. это будущему специалисту научиться самостоятельно осваивать новые знания и умения, что является одной из важнейших целей обучения.

1) для кодирования одного из 16 символов необходимо log(2)16 = 4 бита (2^4=16); для кодирования одного из 32 символов необходимо log(2)32 = 5 бит (2^5=32). объем 1-го письма = 4*120 бит = 480 бит; объем второго - 5*96 = 480 бит. таким образом, объемы равны.

2) 375 байт = 375*8 бит = 3000 бит. объем одного символа = 3000/500 = 6 бит. мощность алфавита = 2^6 = 64 символа.

3) для кодирования одного из 64 символов необходимо log(2)64 = 6 бит. количество символов в тексте = 3*40*60. информационный объем текста = 3*40*60*6 бит = 3*40*60*6/8 байт = 5400 байт.

4) количество символов в указанном диапазоне = 311-55 = 256. количество информации в сообщении об одном числе диапазона = log(2)256 = 8 бит = 1 байт (2^8=256).