<span>1)
var n,i:integer;
begin
readln(n);
for i:=1 to n do
if n mod i = 0 then write(i,' ');
readln;
end<span>.</span></span>
В Linux панель окна выглядит иначе, если же в Windows XP кнопки развернуть, свернуть, закрыть находятся справа, то в Linux наоборот. Также если брать Ubuntu (Linux) то мы заметим что название папки или директории (где же мы находимся?) то он всегда скрывается, но при наведении на панель окна он сразу появляется, в Windows название папки или путь всегда отображается. Еще одна особенность в том что в Linux всё очень интересно сделано и красиво отсортировано по полачкам. Например: В панель окна Windows вы можете настроить Вид, Файл, Веб-узлы и.т.д. В Linux вы такого не увидите, но за то панель слева как и в Windows 7 отображает все устройства и необходимые папки. Есть достаточно много особенностей которые схожи с Windows. Например: Оформление. Это самое первое что бросается в глаза. В Linux они выглядят иначе, по другому оформлены значки. (И всё очень синхронно, опять же примером является Ubuntu). Как и в Windows и Linux есть контекстное меню которое отображет действие над папками и файлами. Панель навигации (Назад, Вперед, Вырезать, Копировать) в Linux естественно этого нет, но за то панель слева как я уже и сказал в Windows 7, отображает в виде дерева папки открытые нами.
DECLARE FUNCTION f# (x AS DOUBLE)
DECLARE FUNCTION Integ# (a AS DOUBLE, b AS DOUBLE, n AS LONG)
'Main program
DIM eps AS DOUBLE, n AS LONG, s AS DOUBLE, s1 AS DOUBLE
DIM a AS DOUBLE, b AS DOUBLE
CLS
a = 0: b = 1: eps = .001
n = 100
s = Integ#(a, b, 10#)
DO
s1 = s
s = Integ#(a, b, n)
n = n * 2
LOOP UNTIL ABS(s - s1) <= eps
PRINT s
END
FUNCTION f# (x AS DOUBLE)
f# = x ^ 3 * EXP(x ^ 2)
END FUNCTION
FUNCTION Integ# (a AS DOUBLE, b AS DOUBLE, n AS LONG)
DIM h AS DOUBLE, xb AS DOUBLE, x AS DOUBLE
DIM s AS DOUBLE, i AS INTEGER
h = (b - a) / n
s = 0
xb = a
FOR i = 0 TO n - 1
x = xb + i * h
s = s + f(x) * h
NEXT i
Integ# = s
END FUNCTION
<em><u>Результат выполнения программы:</u></em>
.4991509793572241
<em>Погрешность не превышает 0.001 при контрольном значении, равном 0.5</em>
1) Шифр Цезаря со сдвигом 2: Кожаыкл ижнвпкж - кыжф дрйорипруфю, пж кожаыкл ижнвпкж - кыжф сткщкпх
2)Шифр с заменой букв на цифры(использовано первые буквы клавиатуры): еугкнггк кенуену - уецкгг нуцеецншйгуеешз, енц уенцкнну цнйшнкеу - уцнгу унцггуц
k = float(input('Введите число для сравнения: '))
print('Вводите числа в одной строке через пробел:')
a = list(map(float,input('Ввод: ').split()))
m,r,b = 0,0,0
for i in a:
if i < k:
m += 1
if i == k:
r += 1
if i > k:
b += 1
print('Меньше ',k,':',m,' чис.')
print('Равно ',k,':',r,' чис.')
print('Больше ',k,':',b,' чис.')