Взависимости от введенного числа 1,2,3 программа должна вычислять длину окружности; площадь круга; объём цилиндра. c=2πr s=πr2 v=πr2h

var k,r,h:integer;
begin
writeln('1 - длина окружности; 2 - площадь круга; 3 - объём цилиндра');
write('k = ');
readln(k);
case k of
1,2: begin write('R = '); readln(r); end;
3: begin write('R, h: '); readln(r,h); end;
end;
case k of
1: writeln('C = ',2*pi*r:5:3);
2: writeln('S = ',pi*r*r:5:3);
3: writeln('V = ',pi*r*r*h);
else writeln('Ошибка ввода');
end;
end.

Пример:
1 - длина окружности; 2 - площадь круга; 3 - объём цилиндра
k = 2
R = 5
S = 78.540

Язык C++. #include < iostream >
#include < cmath >
using namespace std;
int main() {
float c, s, v, h, r;
int m;
cout << "Выберите цифру, где: 1 - длина окружности, 2 - площадь круга, 3 - объем цилиндра." << endl;
cin >> m;
switch (m){
case (1):{
cout << "Введите радиус: " << endl;
cin >> r;
cout << "Длина окружности равна: " << 2*M_PI*r << endl;
break;
}
case (2):{
cout << "Введите радиус: " << endl;
cin >> r;
cout << "Площадь круга равна: " << M_PI * pow (r,2) << endl;
break;
}
case (3): {
cout << "Введите радиус и высоту: " << endl;
cin >> r >> h;
cout << "Объем цилиндра равен: " << M_PI * pow (r,2 ) * h << endl;
break;
}
default:
cout << "Некорректный ввод." << endl;
}
return 0;
}