Алгоритм (программа на паскале):
var a,d,n: integer; y:real;
begin
a:=10;
d:=2;
n:=3;
y:=(a+d*(n-1))*n/2;
writeln(y);
end.
Результат:
21
Блок-схема - в прилагаемом файле.
Ой Как трудно ужас просто как это ты решил. Тебе каким то способом надо помочь милая
П1 <-> П0 5 , 2 3 ИП0 x^2 * 4 , 3 6 ИП0 * + 1 , 2 ИП1 3 <-> x^y * + 0 , 8 9 ИП1 * ИП0 ИП1 + sin 2 * ИП0 ИП1 * e^x * / + С/П
Var a,b:real;
begin
Write('a=');
readln(a);
write('b=');
readln(b);
writeln('p=',2*(a+b));
end.