Форум программистов, компьютерный форум, киберфорум
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.50/4: Рейтинг темы: голосов - 4, средняя оценка - 4.50
0 / 0 / 0
Регистрация: 20.06.2010
Сообщений: 10
1

Сформировать новый файл последовательного доступа,элементами котороого является числа а1,а1*а2,а1*а3,...,а1*а2*а3*...*аn

02.02.2011, 21:40. Просмотров 726. Ответов 4
Метки нет (Все метки)

запустить в файл последовательного доступа N натуральных чисел:а1,а2,...аn(числа получить с помощью датчика случайных чисел)Сформировать новый файл последовательного доступа,элементами котороого является числа а1,а1*а2,а1*а3,...,а1*а2*а3*...*аn
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
02.02.2011, 21:40
Ответы с готовыми решениями:

Сформировать файл последовательного доступа, элементами которого являются числа a1, a1*a2, a1*a2*a3,........,a1*a2*a3*......an
Записать в файл последовательность доступа N натуральных чисел: a1, a2,a3....an (числа получить с...

Сформировать новый файл последовательного доступа
Здравствуйте. Помогите пожалуйста переписать прогу на с++. Никак не пойму как там манипулировать...

Сформировать новый файл последовательного доступа из элементов исходного
Записать в файл последовательного доступа N натуральных чисел: A1, A2, ..., An (числа получить с...

Сформировать новый файл последовательного доступа из элементов исходного
Помогите исправить программу, которая формирует новый файл последовательного доступа, компонентами...

4
151 / 149 / 44
Регистрация: 09.02.2010
Сообщений: 407
02.02.2011, 21:51 2
PingWin, ваши наработки?
0
0 / 0 / 0
Регистрация: 20.06.2010
Сообщений: 10
02.02.2011, 21:54  [ТС] 3
к сожалению отсутствуют...
0
Модератор
62503 / 46691 / 32182
Регистрация: 18.05.2008
Сообщений: 112,971
03.02.2011, 10:48 4
Цитата Сообщение от PingWin Посмотреть сообщение
а1,а1*а2,а1*а3,...,а1*а2*а3*...*аn
Совершенно непонятна последовательность, сначала а1, потом а1*а2,а1*а3, вроде дальше должно быть а1*а4, но идет а1*а2*а3*...*аn.
видимо нужно
а1
а1*а2
а1*а2*а3
а1*а2*а3*...*аn

Добавлено через 6 минут
Если так, как я предположил, то ....

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
34
35
36
37
38
39
40
41
42
43
44
45
46
47
uses crt;
var f:file of integer;
    g:file of real;{произведения могут быть очень большими и не войти в целые типы}
    n,a,b,i,j:integer;
    c:real;
begin
clrscr;
randomize;
assign(f,'file1');
rewrite(f);
assign(g,'file2');
rewrite(g);
write('Сколько чисел ввести в файл n=');
readln(n);
for i:=1 to n do
 begin
  a:=random(10)+1;
  write(f,a);
 end;
writeln('Исходный файл:');
reset(f);
while not eof(f) do
 begin
  read(f,a);
  write(a,' ');
 end;
close(f);
writeln;
reset(f);
c:=1;
while not eof(f) do
 begin
  read(f,a);
  c:=c*a;
  write(g,c);
 end;
close(f);
writeln('Файл произведений:');
reset(g);
while not eof(g) do
 begin
  read(g,c);
  write(c:0:0,' ');
 end;
close(g);
readln
end.
1
0 / 0 / 0
Регистрация: 20.06.2010
Сообщений: 10
05.02.2011, 13:06  [ТС] 5
да!
все верно!)
спасибо!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
05.02.2011, 13:06

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

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

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

Файл: Сформировать новый файл, элементами которого являются числа а1, а1•а2, а1•а2•а3,..., al•a2•a3•...•an.
Записать в файл последовательного доступа n натуральных чисел: a1, a2,..., an (числа получить с...

Организовать новый файл последовательного доступа, элементы которого вычисляются по формуле
Записать в файл последовательного доступа N действитель- ных чисел а1, а2, ..., аn. Организовать...


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

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

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