Program DvachAnon;
var x:real;
const a=7.5;
function CalcY(x:real):real;
begin
CalcY:= ((3*sqr(a)+2*abs(x))/(2*x-sqrt(3*a)))*2*cos(sqr(x));
end;
begin
write('Введите переменную "х":');
read(x);
writeln('y = ', CalcY(x));
end.
-------------------------------------------------------------
UPD: не уверен, как это правильно должно выглядеть, спросите у кого-нибудь знающего :D
Определим количество бит на символ
i=I/k
i=(7,5*1024*8)/7680= 8 бит
Тогда количество символов в алфавите N=2^i
N=2^8= 256
Ответ: 256
Человек и информация. От древности до наших дней
<span>История человечества неразрывно связана с информацией. В те времена, когда люди ещё не умели читать и писать, они хранили информацию в памяти и передавали своим потомкам, используя сигналы, жесты, рисунки и звуки. </span>
<span>Позднее, с появлением письменности, люди стали искать удобный и долговечный материал для сохранения и передачи знаний. Так, в обиходе древних жителей появились каменные плиты, глиняные таблички, папирусные свитки, пальмовые и бамбуковые пластины, восковые таблички, берестяные грамоты, пергаментные книги-кодексы. </span>
<span>Долгое время люди использовали бумагу и считали её удобным и сравнительно недорогим материалом для письма. Всем хорошо знакомы книги, журналы, газеты, брошюры, альбомы с картинами и фотографиями, атласы. Мы и сейчас большую часть информации храним на бумаге. </span>
<span>Вы удивитесь, ребята, если узнаете, что даже после изобретения бумаги, ученые не перестали изобретать новые носители информации. Например, несколько десятилетий назад были популярны пластинки, а позднее аудио- и видеокассеты с магнитной плёнкой. </span>
<span>С появлением компьютеров увеличилось количество информации, но и возможностей для её хранения и распространения стало больше. Появились так называемые цифровые носители информации: дискеты, CD-диски, DVD-диски, карты памяти (флешки) . </span>
<span>Сегодня не обязательно хранить информацию в памяти своего компьютера, её можно разместить в Интернете, использовать в любой точке земного шара и передавать другим людям без особого труда. </span>
<span>Такие безграничные возможности заставляют каждого грамотного жителя из любой страны мира учиться искать, использовать, понимать окружающую нас информацию. </span>
<span>Современный человек не только умеет читать и писать, но и использует в своей работе или учёбе Интернет, получает и отправляет письма, ищет информацию, пользуется в Сети каталогами, справочниками, электронными библиотеками, общается, но при этом грамотно работает с книгой. </span>
<span>Для современного человека информация очень важна. И только по-настоящему грамотный человек знает, как сделать информацию полезной для себя и других. </span>
<span>Желаю Вам, ребята, стать по-настоящему информационно грамотными людьми, а наш курс Вам в этом поможет.</span>
Var a,s:integer;
begin
read(a);
while a<>0 do
begin
if (a>=10)and(a<=99)and(a mod 8 = 0) then s:=s+a;
read(a);
end;
writeln(s);
<span>end.
Пример:
123 16 468 87 12 88 536 0
<span>104</span></span>
