Var a,b,c,d,e,y:integer; begin write('Введите длины всех сторон пятиугольника, см : '); readln(a,b,c,d,e); y:=a+b+c+d+e; writeln('Периметр данного пятиугольника, см = ',y); readln; end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
