var a:integer;
var s1,s2:string;
begin
inc(a);
write('Vvedite slovo: ');
readln(s1);
repeat
s2:=s2+s1[a];
a:=a+2;
until(a>length(s1));
writeln(s2);
readln;
end.
1) V=M*N*b -где b-битовая глубина цвета.
Nц - количество используемых цветов равно 2 в степени b=16, отсюда b=4
V=400*200*16 =1 280 000 бит = 160 000 байт = 156,25Кб
2) Квадрат станет чёрным, а фон станет синим
Всего 275 решений
Копируете свою схему и получаете решение
Texture.bmp ну точечный рисунок , ну или просто фото в формате .bmp
Foto.doc документ Word?? Вроде это я так понял
Подставим в блок-схему вместо х число 5. В блоке условия получим выражение 5>18? Это выражение ложно, поэтому выполнение задачи будет дальше по ветке "нет". В вычислительном блоке х примет такое значение:
х=2*5+1=10+1=11
следующий блок изменяет значение х
х=2*11=22
ответ: переменная х примет значение 22
на Pascal фрагмент этого алгоритма будет выглядеть так:
F X<18 THEN BEGIN
X:=2*X+1;
X:=2*X;
END
ELSE
X:=7-5*X
END;