Function reverse(s:string):string;
var s1:string;
i:integer;
begin
for i:=1 to length(s) do
s1:=s[i]+s1;
reverse:=s1;
end;
var s:string;
begin
readln(s);
s:=reverse(s);
writeln(s);
<span>end.</span>
Можно сделать в формате cout << "Введите номер нужно программы"; if(number==1){выполняется код первой программы (ввод, вывод)}
Если номер = 2, выполняется код второй программы, три - третей. Т.е. каждая программа отдельно в зависимости от выбора пользователем.
Или же сразу через cin вводишь все переменные, потом считаешь s1,s2,s3 и выводишь их.
периметр это сумма длин всех сторон. следовательно для того чтобы найти периметр нужно длину умножить на два и ширину умножить на два потом два ответа сложить (а*2)+(б*2) или же сложить все стороны