Найти количество удвоенных нечетных чисел среди компонентов файла

@solnze.90 · Регистрация: 04.11.2010

Студворк — интернет-сервис помощи студентам

Заполнить файл F целыми числами,полученными с помощью генератора случайных чисел. Найти количество удвоенных нечетных чисел среди компонентов файла.

Добавлено через 2 часа 42 минуты
кто-нибудь!!!! неужели ни у кого нет идейки по написанию программки???

@Puporev · 05.11.2010, 15:09

Сообщение от solnze.90

неужели ни у кого нет идейки по написанию программки???

Идейка есть. Примерно так, если есть синтаксические ошибки, поправь, писал здесь.

Pascal

var f:file of integer;
     a,n,i,k:integer;
begin
assign(f,'file');
rewrite(f);
randomize;
write('n=');
readln(n);
for i:=1 to n do
 begin
  a:=random(100)+1;
  write(f,a);
 end;
reset(f);
writeln('Содержание файла:');
k:=0;
while not eof(f) do
 begin
  read(f,a);
  write(a,' ');
  if(a mod 2=0)and(a mod 4<>0) then k:=k+1;
 end;
close(f);
writeln;
write('Количество двойных нечетных=',k);
readln
end.

@SuPeR XaKer · 05.11.2010, 15:19

Не по теме:

думаю имелось ввиду встречающиеся два раза.

@Puporev · 05.11.2010, 15:21

Сообщение от solnze.90

Найти количество удвоенных нечетных чисел среди компонентов файла.

При чем здесь 2 раза? Удвоенные нечетные это числа типа 6,10,14,18....

@SuPeR XaKer · 05.11.2010, 15:29

При чем здесь 2 раза? Удвоенные нечетные это числа типа 6,10,14,18....

ну я не знаю.Задания по разному формулируют.

@Puporev · 05.11.2010, 15:31

ну я не знаю.Задания по разному формулируют.

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

@solnze.90 · 05.11.2010, 15:41 **[ТС]**

Спасибо большое!!! работает!!! вы настоящие спасители!!!

@solnze.90 0 / 0 / 0 Регистрация: 04.11.2010 Сообщений: 60
		1
	Найти количество удвоенных нечетных чисел среди компонентов файла 05.11.2010, 14:27. Показов 3011. Ответов 6 Метки нет (Все метки) Заполнить файл F целыми числами,полученными с помощью генератора случайных чисел. Найти количество удвоенных нечетных чисел среди компонентов файла. Добавлено через 2 часа 42 минуты кто-нибудь!!!! неужели ни у кого нет идейки по написанию программки??? 0

@SuPeR XaKer
	05.11.2010, 15:19 #3
	Не по теме: думаю имелось ввиду встречающиеся два раза. 0

@Puporev Почетный модератор 64291 / 47589 / 32740 Регистрация: 18.05.2008 Сообщений: 115,181
	05.11.2010, 15:21	4
	Сообщение от solnze.90 Найти количество удвоенных нечетных чисел среди компонентов файла. При чем здесь 2 раза? Удвоенные нечетные это числа типа 6,10,14,18.... 0

@SuPeR XaKer 2857 / 1986 / 788 Регистрация: 23.09.2010 Сообщений: 4,877
	05.11.2010, 15:29	5
	При чем здесь 2 раза? Удвоенные нечетные это числа типа 6,10,14,18.... ну я не знаю.Задания по разному формулируют. 0

@Puporev Почетный модератор 64291 / 47589 / 32740 Регистрация: 18.05.2008 Сообщений: 115,181
	05.11.2010, 15:31	6
	ну я не знаю.Задания по разному формулируют. Задание нормально сформулировано, однозначно, и нефиг придумывать. 0

@solnze.90 0 / 0 / 0 Регистрация: 04.11.2010 Сообщений: 60
	05.11.2010, 15:41 [ТС]	7
	Спасибо большое!!! работает!!! вы настоящие спасители!!! 0

Опции темы

Найти количество удвоенных нечетных чисел среди компонентов файла

Решение