//1
var x: real;
begin
write('x = ');
readln(x);
writeln(abs(10 - sqrt(1 + x * x)));
end.
//2
begin
randomize;
writeln(random(15) + 21);
end.
//3
var a, b: real;
begin
write(' Катет a = ');
readln(a);
write(' Катет b = ');
readln(b);
writeln(' Гипотенуза = ', sqrt(a * a + b * b));
end.
1) Из матем :
Число́ --важнейшее математическое понятие. Возникнув в простейшем виде ещё в первобытном обществе, понятие Ч. изменялось на протяжении веков, постепенно обогащаясь содержанием по мере расширения сферы человеческой деятельности и связанного с ним расширения круга вопросов, требовавшего количеств. описания и исследования. На первых ступенях развития понятие Ч. определялось потребностями счёта и измерения, возникавшими в непосредственной практической деятельности человека. Затем Ч. становится основным понятием математики, и дальнейшее развитие понятия Ч. определяется потребностями этой науки.
2)Русский
Понятие о лексических синонимах
Если анализ семантической структуры слова наглядно показывает степень самостоятельности значения слова и ее пределы, то есть характеризует системные отношения на уровне одного слова, то синонимия является одним из ярких и убедительных доказательств системных отношений в лексике в сфере группы близких по значению слов.
3)ГЕОГРАФ:
Степи--Под именем С. подразумевают более или менее ровные сухие безлесные пространства, покрытые обильной травянистой растительностью. Пространства ровные и безлесные, но влажные, не называются С.; они образуют или болотистые луга, или, на дальнем севере, — тундры. Пространства с очень редкой растительностью, которая не образует
травянистого покрова, но состоит из отдельных, далеко друг от друга разбросанных кустиков, называются пустынями.
Var rast,summa:real;
k:integer;
begin
rast:=10;
summa:=10;
for k:=2 to 7 do
begin
rast:=rast+rast/10;
summa:=summa+rast;
end;
writeln(summa);
<span>end.</span>
8 бит на все буквы. перепишем битовые значения букв
00 - А
01 - Б
10 - В
11 - Г
Ответ : Два бита
в цикле от второго до предпоследнего элемента смотрятся текущий элемент и его соседи. если текущий элемент больше своих соседей, то в память записывается номер текущего элемента и цикл завершается (потавить переменную в true, а в усовии выполнения цикла потставить ещё проверку значения этой перевенной), первый элемент тройки - то число в памяти-1, второй элемент - само число, а третий элемент - число в памяти+1. Если при завершение цикла не было найдено таких троек(та перменная равна false), то значит таких троек нет.
ПСЕВДОКОД
[n] - n-ый элемент массива(перед [ пишется название массива)(нумерация элементов начинается с нуля)
размер массива - N
массив М;
целое число (intenger) А := 0;
логическа единица(boolean) B := false;
целое число i := 1;
пока(i<N-1 И B=false)
начало
ЕСЛИ(M[i]>M[i-1] И M[i]>M[i+1])
начало
A := i;
B := true;
конец
i := i+1;
конец
ЕСЛИ (B = false) то таких троек нет
ИНАЧЕ то A-1 - превый элемент тройки, A - второй, A+1 - третий.