Ты написал вместо "begin" bedin. И за константу Pi брать не надо. В системе Pi уже есть, поэтому начальные значения ей давать не нужно. У тебя программа должна выглядеть вот так:
program n_2;
var r, c, s: real;
begin
writeln('Вычисление длины окружности и площади круга');
write('Введите r>>');
readln(r);
c:= 2*pi*r;
s:=pi*r*r;
writeln ('c=', c:6:4);
writeln ('s=', s:6:4)
end.
Лист защищен без пароля, чтобы случайно не повредить формулы
Снимаете пароль, вводите уравнения параболы и линии.
Ставите защиту.
Сервис/подбор параметра -- находите корень изменяя выделенные клетки в середине таблицы, получаете график.
Мышь, клава, микрофон, вебка, джойстик, сканер (если это он в нижнем правом углу)