На сколько килобайт превышает информационный объем изображение размером 500х500 пикселей, количество цветов в палитре – 256, если допустимый информационный объем для публикации в Интернет равен 200 килобайт ​

1.

var n1,n2,n3: integer;

begin

writeln('Введите n1,n2,n3: ');

readln(n1,n2,n3);

if (n2<n1) then swap(n2,n1);

if (n3<n1) then swap(n3,n1);

if (n3<n2) then swap(n3,n2);

writeln('n1,n2,n3 в возрастающем порядке: ',

n1,' ',n2,' ',n3);

end.

2.

var a,b,c: integer;

var s: real;

begin

writeln('Введите a,b,c: ');

readln(a,b,c);

s:=(a-b-c)/(sqrt(a*b*c));

writeln(s);

end.

3.

var a,b,c: integer;

var s: real;

begin

writeln('Введите a,b,c: ');

readln(a,b,c);

s:=(a+b+c)/3;

writeln('Среднее арифметическое: ',s);

end.

4.

var a,b: integer;

var s: real;

begin

writeln('Введите a,b: ');

readln(a,b);

if ((a>0) and (b>0)) then s:=a+b

else s:=a*a-b*b;

writeln(s);

end.

52 раза

Объяснение:

Цикл for существует в двух формах:

for счетчик:=значение to конечное_значение do  

    тело_цикла;

for счетчик:=значение downto конечное_значение do  

    тело_цикла;

Счетчик – это переменная любого из перечисляемых типов (целого, булевого, символьного, диапазонного, перечисления). Начальные и конечные значения могут быть представлены не только значениями, но и выражениями, возвращающими совместимые с типом счетчика типы данных. Если между начальным и конечным выражением указано служебное слово to, то на каждом шаге цикла значение параметра будет увеличиваться на единицу. Если же указано downto, то значение параметра будет уменьшаться на единицу.

Количество итераций цикла for известно именно до его выполнения, но не до выполнения всей программы. Так в примере ниже, количество выполнений цикла определяется пользователем. Значение присваивается переменной, а затем используется в заголовке цикла. Но когда оно используется, циклу уже точно известно, сколько раз надо выполниться.