Даны стороны a, b. Вычислить периметр. В паскаль

program zz1;

var a, b, c:integer; / / задаем переменные целого типа

begin

write (' введите первую сторону прямоугольника '); / / вводим с клавиатуры первое число

read (a);

write (' введите вторую сторону прямоугольника '); / / вводим с клавиатуры второе число

read (b);

c: = (a + b) * 2; / / вычисляем периметр прямоугольника по известной формуле

writeln (' периметр прямоугольника заданного своими сторонами = ', c); / / выводим ответ

end.