Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.07.01;
Скачать: CL | DM;

Вниз

помогите разобраться   Найти похожие ветки 

 
Настя   (2007-06-02 09:47) [0]

Напишите пожалуйста код программы с помощью операторов цикла, в которой нужно определить количество членов, имеющие четные порядковые номера и являющиеся нечетными числами.


 
Savek   (2007-06-02 09:57) [1]

5$


 
Настя   (2007-06-02 10:01) [2]

Напиши бесплатно код, потому что очень нужно


 
Kostafey ©   (2007-06-02 10:07) [3]

Только честно скажите на каких специальностях вы с Катюхой учитесь ?


 
Настя   (2007-06-02 10:11) [4]

Мы учимся на факультете радиоэлектроники, но у еас есть предмет информптика и нам нужно сдать эту программу. Мы тебе ответили честно и теперь ты нам напиши программу. Очень прошу напиши код.


 
Kolan ©   (2007-06-02 10:16) [5]

> [3] Kostafey ©   (02.06.07 10:07)
> Только честно скажите на каких специальностях вы с Катюхой
> учитесь ?


> Мы учимся на факультете радиоэлектроники

Странно вроде не бот&#133 А что это тогда ? :(


 
Настя   (2007-06-02 10:17) [6]

Мы не ботаники, а нужна прога


 
Однокамушкин   (2007-06-02 10:18) [7]

Псевдокод подойдёт?

пусть a - это массив, в котором нужно найти нечётные числа в чётных позициях, инлексируется с нуля...

СчётчикНечётных := 0
Цикл для I от 0 до (Длина(a)-1)/2
 если НечётноеЧисло(a[2*I]) то
   СчётчикНечётных := СчётчикНечётных + 1
КонецЦикла
Вывод "В массиве ", СчётчикНечётных " нечётных чисел, стоящих в чётных позициях"


Осталось перевести это на паскаль... подсказка: оператор целочисленного деления - div, функция, возвращающая True для нечётных чисел - Odd... остальное просто...


 
Kostafey ©   (2007-06-02 10:19) [8]

Тогда еще один вопрос. Сами члены (имеется в виду массив ?) как задаются ?


 
Kolan ©   (2007-06-02 10:19) [9]

> Мы не ботаники, а нужна прога

Бот — не от слова ботаник :-/

Уже же дали млин?&#133


 
Однокамушкин   (2007-06-02 10:19) [10]


> Настя   (02.06.07 10:17) [6]
> Мы не ботаники, а нужна прога

Боты и ботаники имеют весьма мало общего... :))))))))))))


 
Kostafey ©   (2007-06-02 10:20) [11]

> [7] Однокамушкин   (02.06.07 10:18)

Пробовали уже, бесполезно.


 
Настя   (2007-06-02 10:21) [12]

Мы тупы, переведи пожалуйста этот псевдокод в паскаль с помощью операторов цикла


 
Однокамушкин   (2007-06-02 10:23) [13]

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


 
Настя   (2007-06-02 10:24) [14]


> Однокамушкин

Ты можешь написать или нет?


 
Однокамушкин   (2007-06-02 10:26) [15]


> Настя   (02.06.07 10:24) [14]

Могу, но не буду...


 
Kolan ©   (2007-06-02 10:27) [16]

> нет?

Нет, нет. Вам тут не помогут(хотя помогли, уже раз 10 все полностью написали, но вы &#133).
Зайдите на другой сайт напирмер. www.uml.ru там точно помогут.
:) Успехов.


 
Настя   (2007-06-02 10:27) [17]

Нам очень нужно, напиши пожалуйста


 
Kolan ©   (2007-06-02 10:27) [18]

> Нам очень нужно, напиши пожалуйста

Скажи «А»&#133


 
Kostafey ©   (2007-06-02 10:27) [19]

А может имеет смысл чему-нибудь научить их.
Форумчане - народ не злой, заодно и спам "как посчитать 2+2" прекратится.


> Не вижу смысла помогать тупым... тупые должны умирать от
> голода и не засорять своими тупыми генами генофонд человечества...

+1

Выход - сделать не тупыми, ибо всех не перебить ;)


 
Kostafey ©   (2007-06-02 10:29) [20]

Настя, чем всяким спамом заниматься, лучше бы моск включали.
Почему

> [8] Kostafey ©   (02.06.07 10:19)

игнорируем ?


 
Однокамушкин   (2007-06-02 10:35) [21]


> Kostafey ©   (02.06.07 10:27) [19]
> Выход - сделать не тупыми, ибо всех не перебить ;)


Точно, дураки - не мамонты, сами не вымрут... :))))

Но ведь я уже дал им шанс - см. [7]... а если просто дать готовый код, который они завтра отнесут преподавателю, а послезавтра забудут, на их умстенных способностях это никак не отразится...


 
Настя   (2007-06-02 10:38) [22]

Отразится!


 
Kostafey ©   (2007-06-02 10:46) [23]

> Отразится!


Настя, > [21] Однокамушкин прав, спор ни к чему не приведет.
Чтобы был результат советую начать думать над> [8] Kostafey ©   (02.06.07 10:19)


 
Anatoly Podgoretsky ©   (2007-06-02 12:24) [24]

Начинать надо с [18]


 
Оззя ©   (2007-06-02 14:31) [25]

Всё равно не сдаст зачет, даже если код дадут готовый на паскале.


 
Gero ©   (2007-06-02 14:34) [26]

Вовчик если придет, он запросто тебе поможет.


 
default ©   (2007-06-02 14:38) [27]

какой Вовчик, вот Дима О!


 
Вовчик   (2007-06-02 14:45) [28]

function myCount(A: array of Integer): Integer;
var i: Integer;
begin
  i := 0;
  Result := 0;
  while i < Length(A) do begin
     if A[i] mod 2 > 0 then Inc(Result);
     Inc(i, 2);
  end;
end;


 
default ©   (2007-06-02 14:46) [29]

Вовчик   (02.06.07 14:45) [28]
ей нужно не функцией:)


 
Вовчик   (2007-06-02 15:12) [30]

program OKG456_THJSf;
uses Crt;
var N, i, Count: Integer;
   P: ^Integer;
begin
 ClrScr;
 Write("Chislo elementov massiva = ");
 ReadLn(N);
 GetMem(P, SizeOf(Integer)*N);
 for i := 0 to N - 1 do
 begin
   Write("massiv [", i, "] = ");
   ReadLn(Integer(P^));
   Inc(P);
 end;
 Count := 0;
 for i := N-1 downto 0 do begin
   Dec(P);
   if (i and 1 = 0) and (P^ and 1 > 0) then
     Inc(Count);
 end;
 FreeMem(P, SizeOf(Integer)*N);
 WriteLn("-------");
 WriteLn("Chislo nechetnih chisel v chetnih elementah massiva = ", Count);
 ReadLn;
end.


 
default ©   (2007-06-02 15:15) [31]

Вовчик   (02.06.07 15:12) [30]
щас "она" тебя расцелует:)
кстати ты в курсе, что это мальчик?:):):)


 
Leonid Troyanovsky ©   (2007-06-02 16:35) [32]


> default ©   (02.06.07 15:15) [31]

> Вовчик   (02.06.07 15:12) [30]

Не, это не тот Вовчик, наш был половчей.

> кстати ты в курсе, что это мальчик?:):):)

Это его проблемы :)

--
Regards, LVT.



Страницы: 1 вся ветка

Текущий архив: 2007.07.01;
Скачать: CL | DM;

Наверх




Память: 0.53 MB
Время: 0.023 c
15-1180784583
Zeqfreed
2007-06-02 15:43
2007.07.01
Magic 8-ball


1-1177948932
Чародей
2007-04-30 20:02
2007.07.01
Как распаковать zip


2-1181275835
NNN
2007-06-08 08:10
2007.07.01
пароль на *.mdb


1-1178165959
Novice
2007-05-03 08:19
2007.07.01
Скорость TCheckListBox


2-1181291230
kyn66
2007-06-08 12:27
2007.07.01
Сетевое имя пользователя программы