Var a: Integer;
begin
writeln('Введите число');
readln(a);
if a>0 then a:=a*a;
if a<0 then a:=a-2;
if a=0 then a:=10;
writeln('Полученное число: ',a);
end.
Определим глубину кодирования i=I/М, где I- объем изображения (бит), M - количество пикселей.
i=(30*1024*8)/(300*200)= 4 бита
Количество цветов получаем из формулы: N=2^i
N=2^4= 16
Ответ: 16 цветов
Цикл for будет повторяться 6 раз, значит программа на выходе выдаст 72
Різновид керівної конструкції у високорівневих мовах програмування, призначена для організації багаторазового виконання набору інструкцій<span> (команд). Також циклом може називатися будь-яка багатократно виконувана послідовність команд, організована будь-яким чином (наприклад, із допомогою </span>умовного переходу<span>).</span>