Форум программистов, компьютерный форум, киберфорум
Наши страницы
Pascal (Паскаль)
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.79/19: Рейтинг темы: голосов - 19, средняя оценка - 4.79
Unknowns
0 / 0 / 0
Регистрация: 09.04.2009
Сообщений: 12
1

Сформировать и вывести одномерный массив, содержащий N первых чисел Фибоначчи

13.05.2009, 16:07. Просмотров 3756. Ответов 5
Метки нет (Все метки)

Пожалуйста помогите с этими задачками

2. Известен возраст группы людей, состоящей из N человек. Выясните средний
возраст группы и процент людей, возраст которых < 20 лет.
3.Сформировать и вывести одномерный массив, содержащий N первых чисел
Фибоначчи: f0=f1=1,fn=fn-1 +fn-2
5. Дан массив А из N целых чисел. Все его элементы, кроме последнего, упорядочены по возрастанию. Переместить значение последнего элемента на такую позицию в массиве, чтобы все N элементов оказались упорядоченными по возрастанию. Методы сортировок для всего исходного массива не использовать.
8. Дана целочисленная матрица А размерности 5x5 и целое число К. Найти сумму и произведение элементов К-ой строки матрицы А.
10. Даны непустые строки S,S1 и символ С. Перед каждым вхождением символа С в строку S вставить строку S1.
14. Описать процедуру DigitCountSum(X,C,S)находящую количество С цифр в записи целого положительного числа X и сумму его цифр S. (Х- входной, С и S-выходные параметры ). С помощью этой процедуры найти количество и сумму цифр для пяти целых чисел.
15. Сформировать файл, содержащий N записей о работниках предприятия. Записи должны содержать следующие сведения: ФИО, оклад. Отсортировать все записи по возрастанию окладов
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.05.2009, 16:07
Ответы с готовыми решениями:

Сформировать и вывести целочисленный массив, содержащий N первых членов последовательности Фибоначчи
Дано целое число N&gt;2. Сформировать и вывести целочисленный массив размера N, содержащий N первых...

Сформировать и вывести массив размера N, содержащий N первых членов данной прогрессии
№1 Дано целое число N (&gt;1), а также первый член A и разность D арифметической прогрессии....

Дан одномерный массив Z[n]. Сформировать массив L, содержащий только нечетные элементы массива Z
Задача на Pascal. Не решу - зачёт не поставят.

Вывести на экран и в текстовый файл n первых чисел Фибоначчи
Вывести на экран и в текстовый файл n первых чисел Фибоначчи(n вводится с клавиатуры).Каждое число...

Сформировать одномерный массив С, содержащий элементы массива А,присутствующие в массиве В четное число раз.
Сформировать одномерный массив С, содержащий элементы массива А,присутствующие в массиве В четное...

5
Mat_All
12 / 12 / 3
Регистрация: 01.04.2009
Сообщений: 27
13.05.2009, 16:44 2
Цитата Сообщение от Unknowns Посмотреть сообщение
3.Сформировать и вывести одномерный массив, содержащий N первых чисел
Фибоначчи: f0=f1=1,fn=fn-1 +fn-2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
Program Bred;
Uses WinCrt;
Const m=100;
Var
  F:array [1..m] of integer;
  i,n:integer;
Begin
  F[1]:=1; F[2]:=1;
  Readln (n);
  for i:=3 to n do
   F[i]:=F[i-1]+F[i-2];
  for i:=1 to n do
   Write (F[i]:3);
End.
0
Unknowns
0 / 0 / 0
Регистрация: 09.04.2009
Сообщений: 12
13.05.2009, 17:13  [ТС] 3
oO спасибо
0
Mat_All
12 / 12 / 3
Регистрация: 01.04.2009
Сообщений: 27
13.05.2009, 17:16 4
Цитата Сообщение от Unknowns Посмотреть сообщение
. Дана целочисленная матрица А размерности 5x5 и целое число К. Найти сумму и произведение элементов К-ой строки матрицы А.
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
Program Mat_All;
Uses WinCrt;
Const m=5;
Var
  A:array [1..m, 1..m] of integer;
  i,j,k,P,S:integer;
Begin
  Randomize;
  Writeln ('Ishodnaya:');
  For i:=1 to m do
   Begin
     For j:=1 to m do
       Begin
         A[i,j]:=Random(41)-20;
         Write (A[i,j]:4);
       End;
     Writeln;
   End;
 
  Repeat
    Write ('Vvedyte 0<k<',m, ': ');
    Readln (k);
    writeln;
  Until ((k<5) and (k>0));
 
  S:=0; P:=1;
  For j:=1 to m do
   Begin
    S:=S+A[k,j];
    P:=P*A[k,j];
   End;
 
  Write ('S=', S:4, ' P=',P:4);
End.
0
Unknowns
0 / 0 / 0
Регистрация: 09.04.2009
Сообщений: 12
16.05.2009, 12:21  [ТС] 5
Спасиб тебе огромное

Добавлено через 13 часов 13 минут 31 секунду
ап

Добавлено через 3 часа 7 минут 52 секунды
ап

Добавлено через 5 часов 51 минуту 50 секунд
ап

Добавлено через 23 часа 56 минут 0 секунд
ап

Добавлено через 5 часов 43 минуты 52 секунды
ап

Добавлено через 12 часов 48 минут 4 секунды
ап
0
Unknowns
0 / 0 / 0
Регистрация: 09.04.2009
Сообщений: 12
18.05.2009, 00:02  [ТС] 6
ап
0
18.05.2009, 00:02
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.05.2009, 00:02

Построить массив состоящий из 15 первых четных чисел Фибоначчи, используя рекурсивную функцию их нахождения.
№1.Дан массив A состоящий из одно, двух и трехзначных чисел. Используя функцию определения...

Сформурировать и вывести массив размера N, содержащий N первых членов данной прогрессии
Дано целое число N (&gt;1), а также первый член А и разность D арифметической...

Сформировать массив содержащий 15 случайных элементов с помощью датчика чисел, получить новый массив
Сформировать массив содержащий 15 случайных элементов с помощью датчика чисел, получить новый...


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

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

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