Задание 1:
var a,b,c,p,s:real;
begin
write('Введите a: '); readln(a);
write('Введите b: '); readln(b);
write('Введите c: '); readln(c);
p:=(a+b+c)/2;
s:=sqrt(p*((p-a)*(p-b)*(p-c)));
writeln('Площадь: ',s);
end.
Задание 2:
а)
var a:real;
begin
a:=1/(1+(1/(2+(1/(2+(3/5;
writeln(a);
end.
ответ: 0.704545454545454
б)
var
a,b,c,d:real;
begin
write('Введите a: '); readln(a);
write('Введите b: '); readln(b);
write('Введите c: '); readln(c);
d:=(((-b)+sqrt(sqr(b)-4*a*c))/2*a);
writeln(d);
end.
Не понятно, в каком редакторе, но один из вариантов
а) Левая мышка и тянуть, будет выделен голубым цветом.
б) Ctrl-C - Скопировать в буфер.
в) В нужном месте(отметить мышкой) Ctrl-V - туда скопируется из буфера.
г) Левой мышкой отметить, Del.
Повторюсь, это один из вариантов. Для разных редакторов по-разному, но, в основном, так. в Word ищи в меню вверху, там русскими буквами твои действия написаны, поэтому просто отмечаешь, выбираешь в меню нужное действие, ... и всё!
Вообще чень странный вопрос(задача), абсолютно неконкретный, типа, пойди туда, не знаю, куда, принеси то, не знаю, что
Успехов!
