Uses crt; var x,y,z:real; begin readln(x,y,z); if (x<0) and (y<0) and (z<0) and (x<>y) and (x<>z) and (y<>z) then write(x*x,', ',y*y,', ',z*z) else if (x=0) and (y=0) and (z=0) then write('5, 20, 15') else write(x+y+z); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку