//Pascal ABC.NET 3.1 сборка 1219
Const
n=6;
Type
ty=array[1..n,1..n] of integer;
procedure inic(var ar:ty);
Var
i,j,k:integer;
begin
k:=0;
for i:=1 to n do
begin
for j:=1 to n do
ar[i,j]:=0;
if not(odd(i)) then
begin
k:=k+2;
ar[i,k]:=1;
end;
end;
end;
Program by_Relhem;
var a,b,c,S:real;
begin
writeln ('Введите гипотенузу и катет, разделяя их пробелом');
read (a,b);
if a>b then
c:=sqrt(sqr(a)-sqr(b));
if b>a then
c:=sqrt(sqr(b)-sqr(a));
S:=0.5*(a*b);
writeln ('Катет: ',c, ' Площадь: ',S);
end.
Чаще всего применяют следующие способы кодирования информации:
1) графический— с помощью рисунков или значков;
2) числовой — с помощью чисел:
3) символьный с помощью символов того же алфавита, что и исходный текст.
Переход от одной формы представления информации к другой, более удобной для хранения, передачи или обработки, также называют кодированием.
Действия по восстановлению первоначальной формы представления информации принято называть декодированием. Для декодирования надо знать код.
Самое главное
Выбор способа кодирования зависит от цели, ради которой оно осуществляется.
Существует три основных способа кодирования информации: графический, числовой, символьный.
Чтобы декодировать закодированное сообщение, необходимо знать код.
Ну в папке лежат бумажки какие-то а карандаш он маленький если просунуть руку пониже то ты его найдёш
1 цикл. 1*1=1
2 цикл. 1*2=2
3цикл.2*3= 6
ответ. 6