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.
где вопросы? ау я тогда тебе помогу
В текстовый редактор нельзя вставить аудиофайл.
V=1024*1024*7*24=176160768(бит)=22020096(байт)=21504(Кб)=21(Мб)
1) log(2)4096 = 12 бит = 12/8 байт = 1,5 байт
2) 1536*1024*36 бит = 1536*1024*36/(8*1024*1024) Мбайт = 6,75 Мбайт
3) 4*8*300*300*16 бит = 4*8*300*300*16 / (8*1024) Кбайт = 5625 Кбайт
4) log(2)65536 = 16 бит = 2 байта; 256*256*2 байт = 256*256*2/1024 Кбайт = 128 Кбайт
5) 2^4 = 16