С наступающим Новым годом! Форум программистов, компьютерный форум, киберфорум
Наши страницы
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
камиселка
0 / 0 / 0
Регистрация: 14.03.2011
Сообщений: 6
1

Разработка циклических алгоритмов

15.06.2011, 15:37. Просмотров 458. Ответов 4
Метки нет (Все метки)

Дана последовательность из n целых чисел. Определить, со скольких отрицательных чисел она начинается.
0
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
15.06.2011, 15:37
Ответы с готовыми решениями:

Разработка циклических алгоритмов
Определить k - количество трехзначных натуральных чисел, сумма цифр которых...

Разработка циклических алгоритмов
Определить k - количество трехзначных натуральных чисел, сумма цифр которых...

Разработка циклических алгоритмов
необходимо вывести на экран таблицу значений функции Y(x) и ее разложения в ряд...

Разработка циклических алгоритмов
Даны целое n>0 и последовательность из n вещественных чисел, среди которых есть...

Разработка циклических алгоритмов и Обработка массивов
Разработка циклических алгоритмов Определить k - количество трехзначных...

4
IamPugalo
28 / 28 / 3
Регистрация: 14.04.2011
Сообщений: 101
15.06.2011, 15:49 2
Сам, то понял что написал?
0
Arcor
5039 / 1915 / 408
Регистрация: 20.11.2009
Сообщений: 6,264
Записей в блоге: 1
15.06.2011, 15:51 3
Цитата Сообщение от камиселка Посмотреть сообщение
со скольких отрицательных чисел она начинается.
это начало сколько? обычно начало это 1 и конец это 1 или?
0
камиселка
0 / 0 / 0
Регистрация: 14.03.2011
Сообщений: 6
15.06.2011, 16:02  [ТС] 4
числа нужно вводить самому, и определить на каком месте стоит первое отрицательное число
0
Arcor
5039 / 1915 / 408
Регистрация: 20.11.2009
Сообщений: 6,264
Записей в блоге: 1
15.06.2011, 16:07 5
ну это уже совсем другое, что было в 1 сообщении написано

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program Project2;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
const n = 5;
var i: Integer;
    A: Array[1..n] of Integer;
begin
  for i := 1 to n do
    begin
      Write('Vvedite ',i,' element: ');
      Read(A[i]);
    end;
  for i := 1 to n do
    if A[i] < 0 then
      begin
        Write(i);
        Break;
      end;
    ReadLn;
    ReadLn;
end.
0
15.06.2011, 16:07
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
15.06.2011, 16:07

Программирование циклических алгоритмов
Даны целое n&gt;0 и последовательность из n вещественных чисел, среди которых есть...

программирование циклических алгоритмов
Ребятки помогите пожалуста. У меня задание: необходимо вывести на экран таблицу...

Программирование циклических алгоритмов
Переменной t присвоить значение 1 или 0 в зависимости от того, является ли...


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

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

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