Помогите ** языке который вам удобен

0 голосов
80 просмотров

Помогите на языке который вам удобен


image

Информатика | 80 просмотров
Дан 1 ответ
0 голосов

begin

 var q := ReadSeqInteger(3);

 Write(q.Sorted.Take(2).Aggregate(0, (s, x)-> s + x * x).Sqrt:0:9);

end.


image
0

PascalABC.NET