Вывести все значения элементов заданной числовой последовательности. Входные данные:...

Question

Вывести все значения элементов заданной числовой последовательности.
Входные данные: Выходные данные:
Во входном потоке в первой строке записано единственное целое число N (0 < N <= 100) - число элементов числовой последовательности; <br> Во второй строке перечислены вещественные значения элементов числовой последовательности (через пробел). Значения элементов по модулю не превышают 1000.
В выходной поток вывести значения элементов числовой последовательности в столбик с точностью три знака после запятой.
Пример входного файла (input.txt):
10
43.4 564.54 32.435 76.654 342.6456 76....

Comments

пример вывода ?

---

Пример выходного файла (output.txt):43.400564.54032.43576.654342.64676.64543.535342.534876.35342.534

Answer 1

Var
 a:array[1..1000] of extended;
 i,n:longint;
begin
 readln(n);
 for i:=1 to n do read(a[i]);
 writeln;
 for i:=1 to n do writeln(a[i]:0:3);
end.