Маркер заполнения - это маленький черный квадратик в правом нижнем углу выделенной ячейки. Возле него указатель мыши принимает вид черного крестика, обычно он белый.Если протянуть маркер заполнения левой кнопкой мыши, ячейки, соседние с выделенной, куда протащили маркер, заполнятся такой же информацией (если исходная информация имеет формат даты, то заполнятся последовательностью дат) . Протягивание левой кнопкой используется для копирования формул, которые были в исходной ячейке.При протягивании маркера заполнения правой кнопкой мыши при отпускании клавиши появляется контекстное меню, в котором можно выбрать характер заполнения соседних ячеек.Команда Копировать из контекстного иеню скопирует исходную информацию, Заполнить для числовой заполнит последовательностью чисел.Заполнить только форматы - форматирование исходной ячейки скопируется на выделенныеЗаполнить только значения - скопируется не формула, если она была в исходной, а вычисленное значение.Прогрессия позволяет заполнить ячейки членами арифметической, геометрической или даты прогрессиями.
program discuc;
uses crt;
var x,y,z,c,d,r,q,w:real;
begin
writeln ('введите x');
readln (x);
writeln ('введите y');
readln (y);
writeln ('введите z');
readln (z);
writeln ('введите c');
readln (c);
q:=sin(sqr(x));
d:=cos(x)/cos(exp(ln(x)*3));
w:=z/y*c;
r:=q+d+w;
writeln ('r=',r:5:2);
readkey;
end.
2)
program bibup;
uses crt;
var x,y,z,c,v,j:real;
begin
writeln ('введите x');
readln (x);
writeln ('введите y');
readln (y);
z:=(1/(sqr(x)))+1;
c:=sqrt(5);
v:=6.7*(sqr(y));
j:=z-c+v;
writeln ('j=',j:5:2);
readkey;
end.
Это если в Pascal Free
надеюсь это то