Контрольная работа по теме «Растровые изображения»
1) Какой минимальный объём памяти (в Кбайт) нужно зарезервировать, чтобы можно было сохранить любое растровое изображение размером 128 на 128 пикселей при условии, что в изображении могут использоваться 256 различных цветов? В ответе запишите только целое число, единицу измерения писать не нужно.
2) Рисунок размером 64 на 256 пикселей занимает в памяти 16 Кбайт (без учёта сжатия). Найдите максимально возможное количество цветов в палитре изображения.​

Электронная почта (E-mail– Electronic mail) – первый и наиболее  распространенный из сервисов Интернет. Электронная почта – типичный сервис отложенного чтения (off-line). Вы посылаете сообщение, как правило, в виде обычного текста, адресат получает его на свой компьютер и читает ваше сообщение тогда, когда ему будет удобно.E-mail очень похож на обычную бумажную почту, обладая теми же достоинствами и недостатками. Обычное письмо состоит из конверта, на котором написан адрес получателя и стоят штампы почтовых отделений пути следования, и содержимого – собственно письма. Электронное письмо также состоит из заголовка сообщения, содержащего служебную информацию (об авторе письма, получателе, пути прохождения по сети и т.д.), играющего роль конверта, и тела сообщения, являющегося собственно содержимым письма.Вы можете вложить в обычное письмо что-нибудь, например, фотографию, аналогично, вы можете послать файл с данными электронным письмом. Вы можете подписать обычное письмо – можно подписать и электронное письмо. Обычное письмо может не дойти до адресата или дойти слишком поздно, как и электронное письмо. Обычное письмо весьма дешево, и электронная почта самый дешевый вид связи в Интернет.Электронная почта повторяет достоинства (простота, дешевизна, возможность пересылки нетекстовой информации, возможность подписать и зашифровать письмо) и недостатки (негарантированное время пересылки, теоретическая возможность доступа третьих лиц во время пересылки, не интерактивность) обычной почты. Однако у них есть и существенные отличия. Стоимость пересылки обычной почты очень сильно зависит от того, куда, в сколь удаленную точку планеты она должна быть доставлена, и ее размера и типа. Для электронной почты такой зависимости, вообще говоря, нет. Электронное письмо можно шифровать и подписывать гораздо более надежно и удобно, нежели бумажное - для последнего, строго говоря, вообще нет общепринятых средств шифрования. Скорость доставки электронных писем гораздо выше, чем бумажных.Сервис E-mail универсален - множество сетей во всем мире, построенных на совершенно разных принципах и протоколах, могут обмениваться электронными письмами с Интернет, получая тем самым доступ к прочим его ресурсам. Практически все другие сервисы Интернет, использующиеся обычно как сервисы прямого доступа, имеют интерфейс (шлюз) к электронной почте, так что даже если у вас нет доступа к Интернет в режиме on-line, вы можете получать большую часть информации, хранящейся в Интернет, посредством электронной почты. 
 С электронной почты можно:посылать сообщения,получать их в свой электронный почтовый ящик,отвечать на письма ваших корреспондентов автоматически, используя их адреса, исходя из их писем,рассылать копии писем сразу нескольким получателям,вести адресную книгу,использовать средства форматирования сообщения,переправлять полученное письмо по другому адресу,использовать вместо адресов (числовых или доменных имен) логические имена,создавать несколько подразделов почтового ящика для разного рода корреспонденции,включившись в список рассылки, получать доступ к информации, которую готовы для вас предоставить другие специалисты по выбранной вами проблеме,включать в письма любые файлы и т.д.Из Интернет вы можете посылать почту в сопредельные сети, если вы знаете адрес соответствующего шлюза, формат его обращений и адрес в той сети.  

1)
Var a,b,c:integer; x1,x2,d:real;
Begin
 write('a='); readln(a);
 write('b='); readln(b);
 write('c='); readln(c);
 d:=sqr(b)-(4*a*c);
 x1:=(-b+sqrt(d))/(2*a);
 x1:=(-b-sqrt(d))/(2*a);
 writeln('x1=',x1:0:2);
 writeln('x2=',x2:0:2);
End.

2)
Var x,i,s,n,d:integer;
Begin
 write('Введите первый элемент прогрессии: '); readln(x);
 write('Введите количество элементов в прогрессии: '); readln(n);
 write('Введите знаменатель прогрессии: '); readln(d);
 s:=0;
 for i:=1 to n do
   begin
    s:=s+x;
    x:=x+d;
   end;
 writeln('Сумма элементов арифметической прогрессии равна ',s);
End.