Pascal abc;
var a,b,sum:longint;
begin
b:=1;
for a:=0 to 10 do begin
sum:=sum+b;
b:=b*2;
end;
writeln('сумма чисел от 2^0 до 2^10 sum=',sum);
end.
С++;
#include <iostream>
using namespace std;
int main()
{
int sum=0,b=1;
for(int a=0;a<=10;a++)
{
<span> sum=sum+b;
</span><span> b=b*2;</span>
}
cout<<"сумма чисел от 2^0 до 2^10 sum = "<< sum;
return 0;
}
1) цикл выполниться 2 раза.
2) Паскаль не знаю, напишу программу на с++, может быть что-то поймешь
Число заносите в ячейку А1 в ячейку В1 пишете формулу =A1*((A1>=850)*0,10+(A1>=6000)*0,05)
во вложении экселевский файлик с решением
1. var z:array[1..8,1..5] of real;
2. n[i,k]:=random(90)-62;