Составить алгоритм и начертить блок-схему.

var
a,d,n:integer; y:real;
begin
a:=10;
d:=2;
n:=3;
y:=(a+d*(n-1))*n/2;
write(y);
end.

Алгоритм (программа на паскале):
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

Блок-схема - в прилагаемом файле.