сходство:
*текстовые редакторы
*позволяют проводить поиск/замену
*позволяют изменять масштаб отображения текста (в блокноте черех шрифт)
различие:
*ворд сохраняет оформление/форматирование, поддерживает разные форматы файлов
*ворд имеет дополнительные возможности (язык/статистика/таблицы/и много другого)
*ворд может работать с рисунками, гиперссылками и т. д.
Т.к. 129>128. то 7 бит будет мало (2^7=128). Т.о. надо минимум 8 бит (2^8=256)
Const n=3;
var a: array[1..n] of integer;
i, j, k: integer;
begin
randomize;
write ('Исходный массив: ');
for i := 1 to n do begin
a[i] := random(256);
write (a[i]:4); end;
writeln; writeln;
for i := 1 to n-1 do
for j := 1 to n-i do
if a[j] > a[j+1] then begin
k := a[j];
a[j] := a[j+1];
a[j+1] := k
end;
write ('массив по возрастанию: ');
for i := 1 to n do
write(а[i]:4);
writeln;
readln;
<span>end.
______________________________
</span>
В одном каталоге не может быть двух папок или двух файлов с одинаковыми именами. В данном случае в папке USERS есть две папки PETER, чего быть не может.
Program fgg;
var
i, n: Integer;
s: Real;
begin
Write('Введите n: ');
ReadLn(n);
for i := 1 to n do
s := s + 1 / i;
WriteLn('s=', s);
end.