Задание:
Найти сторону прямоугольника зная его периметр и одну сторону, записать задачу с решением на языки программированияПаскаль
Решение:
Var p,a,b: real; beginwriteln ('ведите периметр'); readln (p); writeln ('введите 1 сторону'); readln (a); b: =p/2*a; writeln ('2 сторона равна=', b); end.
Знаете другой ответ?