Написать программу для паскаль. вычислить значение выражения с использованием трех видов цикла . дано натуральное число n .вычислить : (2n +1)

Var
n:integer;
Begin
 Write('Введите число n: ');
 Readln(n);
 Write('2 * ',n,' + 1 = ',2*n+1);
End.