Вопрос несколько некорректен: на каком языке программирования? Вот, например, на Паскале:Program P1;uses crt;var a, b, P, S: real;beginclrscr;write ('Введите 1-ю сторону прямоугольника: ');readln (a);write ('Введите 2-ю сторону прямоугольника: ');readln (b);P:=2*(a+b);S:=a*b;writeln ('Периметр прямоугольника равен: ', P);write ('Площадь прямоугольника равна: ', S);readkey;end.