Оцифровывается старый немой черно-белый кинофильм. разрешение составляет 320 х 240. частота 24 кадра в секунду. длительность фильма — 50 минут. сжатие данных при оцифровке видео не производится. уместится ли полученный видеофайл на cd ёмкостью 700 мб? (ответьте: «да» или «нет».)

var

s,a,n,i,min,max: integer;

begin

min: =32767;

max: =-32768;

readln(n);

for i: =1 to n do

begin

readln(a);

if a< min then min: =a;

if a> max then max: =a;

end;

s: =(min+max)/2;

writeln(s);

end.

1)52: 2=26(чел) любят пирож

2)26-20=6(чел) любят морож

ответ 6 чел

2048 бит : 8: 1024= 0.25 кбайт

program distance; var x1, y1, x2, y2, d: real; begin writeln('введите координаты первой точки'); readln(x1, y1); writeln('введите координаты второй точки'); readln(x2, y2); d : = sqrt(sqr(x2 - x1) + sqr(y2 - y1)); writeln('расстояние между точками = ', d: 2: 2); readln; end.