Программа может выглядеть так:
uses crt;
const m=1000;
type Mas=array [1..m] of integer;
Var A: Mas;
i, Max, n: integer;
Begin
ClrScr;
Write('n = ');
ReadLn(n);
for i:=1 to n do
begin
Write('A[',i, ']=');
ReadLn(A[i]);
end;
Max:=A[1];
for i:=2 to n do
if A[i]>Max then Max:=A[i];
Writeln;
WriteLn ('Max = ', Max);
ReadLn;
end.
Т.к. A>B (A - положительное, B- отритцательное), то условие if A<B не выполняется, значит числа не поменяются. A=0.5 B==1.7
Float s,l,v,r;
float Pi=3,14;
cout<<"R= ";
cin>>r;
s=Pi*(pow(r,2);
p=2*Pi*r;
v=(4/3)*Pi*pow(r,3);
cout<<"Длина окружности "<<l<<endl;
cout<<"Площадь круга "<<s<<endl;
cout<<"Объем шара "<<v<<endl;
13 символов в пароле, 5 символов в алфавите
4<5<8
2²<5<2³, округляем в большую строну, значит i=3
3 бит* 13 символов=39 бит:8=4,785≈5(округляем в большую сторону)
5 байт *75=375 байт
Ответ: 375 байт
1.Купить семена (цветка)
2.Найти хорошое место для посадки цветочка
3.Вскопать яму.
4.Посадить семя.
5.Закопать яму.
6.Полить