Задача 1 Программа проверена для первых четырех элементов (=16)
я помогу если ты поможеш с бант коса )))))))))))))))очень надо.............. если что бег бог бор бар бак мак маг шаг
Program qwerty;
var a, b, P, S: real;
begin
writeln ('Нахождение периметра и площади прямоугольника');
write ('Введите значение первой стороны прямоугольника: ');
read (a);
write ('Введите значение второй стороны прямоугольника: ');
read (b);
P:=2*(a+b);
S:=a*b;
writeln ('Ответ: периметр = ', P:7:2, ', площадь = ', S:7:2,'.');
<span>end.</span>