Помогите с написанием программы в турбо паскале

[Marcus]

Помогите с написанием программы в турбо паскале , вот условие - http://i018.radikal.ru/0910/52/ec7df6ca13cc.jpg

[spAws]

Помогите с написанием программы в турбо паскале , вот условие - http://i018.radikal.ru/0910/52/ec7df6ca13cc.jpg

написал кроме 2-ох сложных))) там где деления, просто уже забыл как написать е в степене n уже давно паскаль открывал

вот а)

Program A;  {A - это название программы, можно изменить}
   var k,y,t:real;
begin
   write('k=');
   readln(k);
   write('y=');
   readln(y);
   write('t=');
   readln(t);
end.

b)

program B;      {B - это название программы, можно изменить}
    var k,y,t:real;
begin
    write('k=');
    readln(k);
    writeln('y=');
    readln(y);
    writeln('t=');
    readln(t);
end.

u=2k+1

program uu;      {uu - это название программы, можно изменить}
    var u,k:real;
begin
    write('k=');
    readln(k);
    u:=2*k+1;
    writeln('u=',u:3:2);
end.