Помогите пожалуйста: дан массив целых чисел от50 до 199 удалить из массива все простые числа и заменить в получившемся массиве на квадраты ближайших к ним и меньшими из чисел фибоначи. Это платно?если да то сколько
Автор: мисс_граффити 8.10.2007 22:38
М
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
Это в любом случае. Переименуй, пожалуйста, в ближайшее время.
По поводу платности. Возможно 2 варианта: тебе помогут, но придется и самой приложить усилия. Тогда - бесплатно. Если самой делать совершенно не хочется, я перенесу тему в "Задачи на заказ". Там можно будет и цену, и сроки, и способ оплаты обговорить.
Автор: T_S 9.10.2007 0:02
Вариант первый...помогите кто чем может ...а дальше может сама смогу разобраться
Автор: Lapp 9.10.2007 9:17
Просто пройтись в цикле по всем элементам, проверяя, является ли текущее число простым. Для проверки можно использовать функцию вроде такой:
function PrimeNumber(n:integer):boolean; var i:integer; b:boolean; begin b:= n>1; i:=2; while b and (i*i<=n) do begin b:=(n mod i)>0; Inc(i) end; PrimeNumber:=b end;
Начни писать саму основную программу с циклом. Что получится, покажи здесь.
PS Не совсем понятно условие.. "заменить в получившемся массиве на квадраты ближайших к ним и меньшими из чисел фибоначи" что за ближайшие к ним? ближайшее снизу или сверху? И как это ".. и меньшими из чисел фибоначи"? Проясни, плз. Если самой не совсем ясно - спрос препа. Если есть точное написанное условие - давай его сюда.