Вывести все значения элементов заданной числовой последовательности. Входные данные: Выходные данные: Во входном потоке в первой строке записано единственное целое число N (0 меньше N меньше = 100) - число элементов числовой...

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