Вопрос по информатике:
Помогите пожалуйста!Создайте файл А, элементы которого являются массивом К=(1; 6,5; 0.3; 4,2; 3,7; 8,6; 0,7; 3,2;). Перепишите из файла А в файл В, все четные (по расположению) элементы. Прочитать файл В.
Пожаловаться
- 09.12.2015 00:06
- Информатика
- remove_red_eye 1755
- thumb_up 37
Ответы и объяснения 1
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var k:=Arr(1.0,6.5,0.3,4.2,3.7,8.6,0.7,3.2); k.Println;
WriteAllText('FileA.txt',k.Select(t->t).JoinIntoString);
var s:=ReadAllText('FileA.txt').ToWords;
WriteAllText('FileB.txt',
Range(1,s.Length-1,2).Select(i->s[i]).JoinIntoString);
ReadAllText('FileB.txt').Println
end.
Результат
1 6.5 0.3 4.2 3.7 8.6 0.7 3.2
6.5 4.2 8.6 3.2
Внимание! Если программа не работает, обновите версию!
begin
var k:=Arr(1.0,6.5,0.3,4.2,3.7,8.6,0.7,3.2); k.Println;
WriteAllText('FileA.txt',k.Select(t->t).JoinIntoString);
var s:=ReadAllText('FileA.txt').ToWords;
WriteAllText('FileB.txt',
Range(1,s.Length-1,2).Select(i->s[i]).JoinIntoString);
ReadAllText('FileB.txt').Println
end.
Результат
1 6.5 0.3 4.2 3.7 8.6 0.7 3.2
6.5 4.2 8.6 3.2
Пожаловаться
- 01.01.1970 00:00
- thumb_up 3
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.
Новые вопросы
Интересные вопросы