Замените все элементы массива на их дробную часть

Ответы

Ответ дал: Аноним
0
// PascalABC.NET 3.3, сборка 1583 от 25.11.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=SeqRandom(ReadInteger('n='),-99,99).Select(t->t/10).ToArray;
  a.Println;
  a.Transform(t->Frac(t)); a.Println
end.

Пример
n= 10
-6.7 3.5 0.4 2.6 -1.7 5.4 0.5 1 3 -0.3
-0.7 0.5 0.4 0.6 -0.7 0.4 0.5 0 0 -0.3
Ответ дал: Аноним
0
А если учитель "застрял" в своих знаниях в далеком 1974 году, когда Н.Вирт описал свой первый компилятор с Паскаля, то это его проблемы и ваша беда.
Ответ дал: DanyaHD
0
Ну вот первый ответ написан на понятных командах, и в принципе все хорошо, спасибо
Ответ дал: Аноним
0
То, что непонятно Вам, вовсе не означает, что непонятно всем. Читайте выше - это Ваша беда. И только Ваша.
Ответ дал: Аноним
0
Хотите, чтобы писали на доступном Вам уровне - указывайте его в вопросе.
Вас заинтересует