Чому дорівнюватимуть а і р в результаті виконання вказанного фрагмента програми? Фрагмент на фото:

Python 3.7.4

Объяснение:

>>> p = 0

>>> a = 4

>>> for i in range(5):

a = 2 * a - 1

p = p + a

 

>>> print (a)

97

>>> print (p)

191

>>>

Задание 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.

Ну вот так это будет выглядеть с ветвлением и возможностью повторять вычисления без повторного запуска программы.

var a,b,c,d,z:integer;

begin
writeln('Введите 1 число');
read(a);
writeln('Введите 2 число');
read (b);
writeln('Введите 3 число');
read (c);
d:=a+b+c;
writeln('Сумма чисел ',a,'+',b,'+',c,'=',d);
writeln ('Хотите ли вы решить еще один пример? 1-ДА, 0-Нет');
read (z);
while (z = 1) do
begin
writeln('Введите 1 число');
read(a);
writeln('Введите 2 число');
read (b);
writeln('Введите 3 число');
read (c);
d:=a+b+c;
writeln('Сумма чисел ',a,'+',b,'+',c,'=',d);
writeln ('Хотите ли вы решить еще один пример? 1-ДА, 0-Нет');
read (z);
end;

end.