Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/7: Рейтинг темы: голосов - 7, средняя оценка - 5.00
0 / 0 / 0
Регистрация: 23.12.2011
Сообщений: 6
1

Файлы. Создать файл целых чисел, в котором содержится P первых чисел из файла 1 и Q последних чисел из файла 2

24.12.2011, 00:03. Показов 1350. Ответов 2
Метки нет (Все метки)

Помогите решить две задачи срочно плиз!!!!

1) Написать программу, создающую 2 файла целых чисел разной длины. Файлы заполнить случайными числами. Пользователь вводит 2 целых числа: P и Q. Программа создаёт третий файл целых чисел, в котором содержится P первых чисел из файла 1 и Q последних чисел из файла 2.
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Лучшие ответы (1)
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
24.12.2011, 00:03
Ответы с готовыми решениями:

Создать третий файл целых чисел, в котором содержится Р первых чисел из файла 1 и Q последних чисел из файла 2
Написать программу,создающую 2 файла целых чисел разной длины.Файлы заполнить ,случайными...

Дан файл состоящий из целых чисел. Создать новый файл целых чисел, содержащий длины всех серий исходного файла
Дан файл целых чисел. Создать новый файл целых чисел, содержащий длины всех серий исходного файла...

Дан файл целых чисел. Создать новый файл целых чисел, содержащий длины всех серий исходного файла
Дан файл целых чисел. Создать новый файл целых чисел, содержащий длины всех серий исходного файла...

Дан файл целых чисел. Создать новый файл целых чисел, содержащий длины всех серий исходного файла.
Задачу нужно решить в Borland C++ 3.11 Дан файл целых чисел. Создать новый файл целых чисел,...

2
--\.founder./--
564 / 564 / 392
Регистрация: 20.10.2011
Сообщений: 867
24.12.2011, 00:43 2
Лучший ответ Сообщение было отмечено Chaper как решение

Решение

Цитата Сообщение от Chaper Посмотреть сообщение
1) Написать программу, создающую 2 файла целых чисел разной длины. Файлы заполнить случайными числами. Пользователь вводит 2 целых числа: P и Q. Программа создаёт третий файл целых чисел, в котором содержится P первых чисел из файла 1 и Q последних чисел из файла 2.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
uses crt;
 
var a,b,c:text;
i,p,q,m,n:integer;
m1,m2:array [1..50] of integer;
 
begin
   assign(a,'1.txt');assign(b,'2.txt');assign(c,'3.txt');
   rewrite(a);rewrite(b);rewrite(c);
   randomize;
   n:=random(30)+10;
   m:=random(30)+10;
   Writeln('Созданно ',n,' чисел в 1 файле .');
   Writeln('Созданно ',m,' чисел в 2 файле .');
   Write('P = ');readln(p);
   Write('Q = ');readln(q);
   For i:=1 to n do
     begin
     m1[i]:=random(50)+1;
     Write(a,m1[i],' ');
     end;
   For i:=1 to m do
     begin
     m2[i]:=random(41)-20;
     write(b,m2[i],' ');
     end;
   For i:=1 to q do
   write(c,m1[i],' ');
   write(c,#13,#10);
   For i:=m-q to m do
   write(c,m2[i],' ');
   close(a);close(b);close(c);
end.
1
0 / 0 / 0
Регистрация: 23.12.2011
Сообщений: 6
24.12.2011, 00:51  [ТС] 3
спасибо

Добавлено через 5 минут
веб максу тоже спасибо!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
24.12.2011, 00:51

Дан файл вещественных чисел Создать файл целых чисел, содержащий номера локальных максимумов исходного файла
2-File. Дан файл вещественных чисел. Создать файл целых чисел, содержащий номера всех локальных...

Дан файл вещественных чисел. Создать файл целых чисел, содержащий номера всех локальных экстремумов исходного файла в порядке убывания
File22. Дан файл вещественных чисел. Создать файл целых чисел, содержащий номера всех локальных...

Работа с файлами. Даны три файла целых чисел. Создать новый файл, в котором чередовались бы элементы исходных файлов
Даны три файла целых чисел одинакового размера с именами SA, SB, SC и строка SD. Создать новый файл...

Создать файл целых чисел и записать в него N первых положительных четных чисел
вот задача: Дано имя файла и целое число N (> 1). Создать файл целых чисел с данным именем и...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
3
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.