Program n1;
//Название программы
var i,n,sum: integer;
//Объявление переменных
begin
//Начало
readln(n);
//Ввод n (количество чисел) и и переход на следущую строку
sum:=0;
//Присваивание переменной sum знаяения 0 (изначально сумма равна 0)
for i:=1 to n do sum:=sum+2*i;
//В цикле от 1 до n к переменной
//sum прибавляем 2*i, т.е. 1*2+2*2+3*2+..n*2=2+4+6+..+2n;
writeln(sum);
//Ввод sum (cумма первых n целых положительных четных чисел)
//и и переход на следущую строку
end.
//Конец
/////////////////////////////////////////////////////////
Var
a,b,c,max,min,mid:real;
begin
readln(a,b,c);
if (a>b) then begin max:=a; mid:=b end
else begin max:=b; mid:=a end;
if c>max then max:=c
else
if c>mid then begin min:=mid; mid:=c end;
write(min,' ',mid,' ',max);
end.<span>
</span>
Ответ:
Объяснение:
1
b=0, a=a*2=1*2=2
b=1, a=2*2=4
b=2, a=4*2=8
b=3, a=8*2=16
b=4, a=16*2=32
a=32
3
a=2, x=a*3=2*3=6, x=x+1=6+1=7
a=3, x=3*3=9, x=x-1=9-1=8
a=4, x=13
a=5, x=14
a=6, x=19
a=7, x=20
a=8, x=25
a=9, x=26
a=10, x=31
5
№, действие, результат
1, x*x, x^2
2, c*x^2, cx^2
3, 12*cx^2=12cx^2
4, x^2*x, x^3
5, 2*x^3, 2x^3
6, z*a, za
7, za*c, zac
8, 12cx^2+2x^3, 12cx^2+2x^3
9, 12cx^2+2x^3+zac, 12cx^2+2x^3+zac
В MS Excel по умолчанию числа выравниваются по правому краю, текст по левому
Но при ручном форматировании можно выравнивать как угодно