Не знаю можно ли считать ноль, как "мінімальне додатнє", потому не включала
Объяснение:
#include<iostream>
using namespace std;
int main()
{
int l[15];
double min=0,max=0;
for(int i=0;i<15;i++)
{
cin>>l[i];
if(l[i]>0&&l[i]<min&&min!=0)
min=l[i];
if(min==0&&l[i]>0)
min=l[i];
if(l[i]<0&&l[i]>max&&max!=0)
max=l[i];
if(max==0&&l[i]<0)
max=l[i];
}
sort(l,l+15);
cout<<min<<" "<<max<<endl;
cout<<min/max<<endl;
for(int i=14;i>=0;i--)
cout<<l[i]<<" ";
return 0;
}
1.
var a,n,k,i:integer;
begin
write('Введите основание степени (целое число) ');
readln(a);
write('Введите показатель степени (целое число) ');
readln(n);
k:=1;
i:=0;
while i < n do
begin
k:=k*a;
i:=i+1
end;
writeln(a,'^',n,' = ',k)
end.
2.
var a,n,k,i:integer;
begin
write('Введите основание степени (целое число) ');
readln(a);
write('Введите показатель степени (целое число) ');
readln(n);
k:=1;
for i:= 1 to n do k:=k*a;
writeln(a,'^',n,' = ',k)
end.