Составить программу нахождения S и P прямоугольника по сторонам a,b.
Составить программу нахождения S и P прямоугольника по сторонам a,b.
Гость
Ответ(ы) на вопрос:
ГостьVar
a,b:integer;
Begin
Write('Введите длину и ширину ');
Readln(a,b);
write('S = ',a*b,', P = ', a*2+b*2);
End.
Не нашли ответ?
Похожие вопросы