Вычисли значение y:
var i,n, y:integer;
begin
y:=1;
for i:=1 to 6 do
y:=y+2;
writeln ('y=', y)
end.
2
Вычисли значение y:
var n, y: целое число;
начать
y:=10;
n:=2;
пока Н
начать
y:=y+3;
n:=n+1;
конец;
writeln (y)
конец.
3
Вычисли значение y:
var n, y: целое число;
начать
y:=0;
n:=2;
повторять
y:=y+2;
n:=n+1;
пока n
writeln (y)
конец.

1.
Const R=5;
Var L,S:real;
Begin
L:=2*Pi*R;
S:=Pi*sqr(R);
writeln ('Радиус окружности R = ',R, ' см');
writeln ('Длина окружности L = ',L:4:2, ' см');
writeln ('Площадь круга S = ',S:4:2, ' см кв.');
End.

2.
Const r1=20;
Var S1,S2,S,r:real;
Begin
writeln ('Введите внешний радиус');
readln (r);
S1:=Pi*sqr(r1);
S2:=Pi*sqr(r);
S:=S2-S1;
writeln ('Площадь кольца = ', S:4:2);
End.

3. 
Var tet, ob, col, kar, ck, sum: real;
Begin
writeln ('Введите цену 1 тетради');
readln (tet);
writeln ('Введите цену 1 обложки');
readln (ob);
writeln ('Введите количество комплектов');
readln (col);
writeln ('Введите цену 1 карандаша');
readln (kar);
writeln ('Введите количество карандашей');
readln (ck);
sum:=(tet+ob)*col+kar*ck;
writeln ('Стоимость покупки = ', sum);
End.

C# не знаю. ответа вряд ли дождешься.

Если обладаешь минимальными знаниями в C# - переделаешь с C++.

#include <iostream>

const float PI = 3.14;//определите значение сами. Можно, конечно, брать более точное(double) из библиотек, но ограничусь этим.

int main()

{

   int  

       R,//радиус бОльшей окружности.

       r = 20,//радиус меньшей окружности.

       result;//площадь.

   std::cin >> R;

   std::cout << "радиус бОльшей окружности = " << R << std::endl;

   std::cout << "радиус меньшей окружности = " << r << std::endl;

   std::cout << "Площадь равна = " << PI*(R*R-r*r);

   

}