Var
s, s1: string;
i: integer;
begin
writeln('введите предложение ');
readln(s);
repeat
i := pos(' ', s);
delete(s, i, 1);
until i = 0;
s1 := '';
for i := length(s) downto 1 do
s1 := s1 + s[i];
if s = s1 then
writeln('это палиндром')
else
writeln('не палиндром');
end.
количество кружечков
в восьмерке например 2 кружечка
Var s,h:integer;
begin
a:=5;
for x:=2 to 9 do writeln(x,'x',a,'=',x*a);
end.
Отличие информации от данных состоит в том, что данные - это фиксированные сведения о событиях и явлениях, которые хранятся на определенных носителях, а информация появляется в результате обработки данных при решении конкретных задач. Например, в базах данных хранятся различные данные, а по определенному запросу система управления базой данных выдает требуемую информацию.
V = K * I, где
V - объем;
K - размер изображения;
I - количество бит.
N = 2^i, где
N - количество цветов.
N = 2^i.
64 = 2^i.
I = 6 бит.
V = K * I = (1280*80*6)/2^13 = (2^7 * 10 * 2^4 * 5 * 3 * 2)/2^13 = (2^12 * 150)/2^13 = 150/2 = 75 кбайт.
Ответ: 75 кбайт.