Каждая страница текста состоит из 32-х строк. в каждой строке по 62 символа. определите максимальное кол-во страниц такого текста, записанного в кодировке kon8 usb емкостью 512 мб. заранее ! совершенно не понимаю, как решать, ..
КОИ-8-однобайтовая кодировка,значит каждый символ кодируется одним байтом. Объём одной страницы=32*62*1=1984(байт)=1.9375(Кбайт). Объём накопителя=512(Мбайт)=524288(Кбайт). Количество страниц=524288/1.9375=270600.
1) program chik; var a:array[1..100]of integer; i,s:integer; begin for i:=1 to 11 do begin read(a[i]); end; s:=0; for i:=1 to 11 do begin if(a[i] mod 5=0)then s:=s+a[i]; end; write(s); end. 2) program chik2; var a:array[1..100]of integer; i,s:integer; begin s:=0; for i:=1 to 11 do begin read(a[i]); end; s:=0; for i:=1 to 11 do begin if(a[i] mod 2=1)then s:=s+1]; end; write(s); end. 3) program chik3; var a:array[1..1000]of integer; i:integer; begin for i:=1 to 9 do begin read(a[i]); end; for i:=1 to 9 do begin if(a[i] mod 2=0)then write(a[i],' '); end; end.
1) program chik; var a:array[1..100]of integer; i,s:integer; begin for i:=1 to 11 do begin read(a[i]); end; s:=0; for i:=1 to 11 do begin if(a[i] mod 5=0)then s:=s+a[i]; end; write(s); end. 2) program chik2; var a:array[1..100]of integer; i,s:integer; begin s:=0; for i:=1 to 11 do begin read(a[i]); end; s:=0; for i:=1 to 11 do begin if(a[i] mod 2=1)then s:=s+1]; end; write(s); end. 3) program chik3; var a:array[1..1000]of integer; i:integer; begin for i:=1 to 9 do begin read(a[i]); end; for i:=1 to 9 do begin if(a[i] mod 2=0)then write(a[i],' '); end; end.
Объём одной страницы=32*62*1=1984(байт)=1.9375(Кбайт).
Объём накопителя=512(Мбайт)=524288(Кбайт).
Количество страниц=524288/1.9375=270600.