Program p1; var a: real; S: real; P: real; begin writeln('Введите сторону квадрата A: '); readln(a); S := a * a; P := a * 4; writeln('Площадь равна ',S); writeln('Периметр равен ',P); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
