<span>Кодированием числовой информации:называется совокупность приемов наименования и записи чисел.</span>
Program name;
var
a,b:integer;
begin
//Переменная B является сложным процентом за год
b:=0.24;
а:=10000*b;
a:=a+10000;
writeln('Остаток вклада за один год:',а);
а:=0;
b:=0,48;
a:=10000*b;
a:=a+10000;
writeln('Остаток за второй год:',a);
end.
Var a,b,c:real;
begin
write('Катет и гипотенуза:');
readln(a,c);
b:=sqrt(abs(c*c-a*a));
writeln('b = ',b);
end.
Пример:
Катет и гипотенуза:3 5
b = 4
111 в 2 = 1101111
Если , будут вопросы задавайте