Составьте алгоритм нахождение периметра прямоугольника в словесный форме

Чтобы найти площадь прямоугольника, нужно его длину умножить на ширину. то есть ели у нас прямоугольник со сторонами 8 5. 5 8 то нам надо 8см умножить на 5см 8×5=40квадратных сантиметров ответ: 40см в квадрате

на pascal:

program sonik;

uses crt;

var a,b,c: string;

begin

readln (a);   readln (b);   readln (c);

writeln (' фигуры: ',a,b,c);

end.

 

 

 

program xxx;

  var i, n, s : integer;

begin

    write('введите число n=');

    readln(n);

    s: =0;

    i: =2;

    while i< =n do

        begin

          s: =s+i;

            i: =i+2

        end;

    write('сумма четных чисел =', s);

    readln

end.