<span>Объект, который указывает на текущее место в документе, называется курсор.</span>
Program n1;
var a: integer;
begin
write('введите номер месяца: ');
readln(a);
if( a>=1) and (a<3) then writeln('зима');
if(a>=3) and (a<6) then writeln('весна');
if (a>=6) and (a<9) then writeln('лето');
if(a>=9) and (a<13) then writeln('осень');
end.
1) посчитаем количество квартир в подъезде 1953-(1737-1)=217
количество подъездов 1953/217=9
2) ряд задается формулой a [i+1]=a [i]+3^I
считаем ряд дальше 26+81=107
107+343=450
450+1029=1479
3)
Б О Р И С
50 67 95 32 48
4*sqr(a)*sqr(b)*b*(sqr(a)+4*a*b+4*sqr(b))
или
4*sqr(a)*sqr(b)*b*sqr(a+2*b) - это если учесть, что а²+4ab+4b² = (a+2b)²