Срочно !!! Сотавьте программу . Вычислить площадь и периметр при заданных длинах

Спасибо можешь мне ещё одну задачку порешать, а то я пропустила эту тему и не могу

Хорошо, ты вк есть?

Нет я сейчас могу добавить ,а ты через мой профиль зайди оттуда легче найти хорошо??

Давай

Я добавила...

var a,b,c,d:integer;beginWriteln ('Введите длину прямоугольника');readln (a);Writeln ('Введите ширину прямоугольника');readln (b);c:=(a+b)*2;d:=a*b;Writeln ('Периметр равен',с,'Площадь равна',d);