МАТЕМАТИЧЕСКИЕ ОСНОВЫ ИНФОРМАТИКИ
Суббота, 15.12.2018, 06:03
ГлавнаяРегистрацияВход Приветствую Вас Гость | RSS

Меню сайта

Категории раздела
Массив [2]
Одинаковые элементы в массиве [3]

Наш опрос
Какой язык программирования Вы изучаете
Всего ответов: 954

Статистика

Онлайн всего: 1
Гостей: 1
Пользователей: 0

Форма входа


Главная » Файлы » ЗАНЯТИЕ 5 » Массив

Чтение из массива
15.11.2013, 11:15

Чтение из массива

Дан массив из n элементов, нужно прочитать и вывести значения массива.

Пример

input.txt

output.txt

3
1 1 2

1 1 2

4
2 3 2 3

2 3 2 3



Type
MyArray=Array[1..10] of integer;
var n, k, i: integer;
A: MyArray;
begin
assign(input,'input.txt'); reset(input);
assign(output,'output.txt'); rewrite(output);

readln (n);
for i:=1 to n do

read(A[i]);

for i:=1 to n do
write (A[i]);

close(input);
close(output);
end.
Категория: Массив | Добавил: i_elf
Просмотров: 374 | Загрузок: 0 | Рейтинг: 0.0/0
Всего комментариев: 0
Поиск

Друзья сайта
  • Творческий учитель
  • Сайт ООАКМР
  • Школьный сайт
  • Информатика учебник
  • МОИ

  • Copyright MyCorp © 2018 Сделать бесплатный сайт с uCoz