Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.67/3: Рейтинг темы: голосов - 3, средняя оценка - 4.67
0 / 0 / 0
Регистрация: 19.04.2016
Сообщений: 12
1

Получить сумму положительных и число отрицательных членов последовательности

17.06.2016, 22:03. Просмотров 534. Ответов 6
Метки нет (Все метки)


Даны натуральное число n, целые числа a1,a2,...,an.Получить сумму положительных и число отрицательных членов последовательности a1,...,an
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
17.06.2016, 22:03
Ответы с готовыми решениями:

Получить сумму положительных и число отрицательных членов последовательности a1,...,an
можно рабочий проектик пожалуйста? очень сильно надо, что бы в формате pas было(((( Даны...

Получить сумму положительных и отрицательных членов последовательности
Дано натуральное число n, действительные числа a1, ..an ..получить сумму положительных и...

Получить сумму положительных чисел и отрицательных членов последовательности
2. Даны натуральное число n, целые числа a,...,a. Получить сумму положительных чисел и...

Получить сумму положительных и число отрицательных членов последовательности
Даны натуральное число n, целые числа a1,...,an. получить сумму положительных и число отрицательных...

6
Модератор
62843 / 46896 / 32321
Регистрация: 18.05.2008
Сообщений: 113,631
18.06.2016, 10:15 2
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
program Project2;
 
{$APPTYPE CONSOLE}
 
uses
  SysUtils;
var a,n,i,s,k:integer;
begin
write('n=');
readln(n);
s:=0;
k:=0;
for i:=1 to n do
 begin
  write('a=');
  readln(a);
  if a>0 then s:=s+a;
  if a<0 then k:=k+1;
 end;
writeln('Summa polozitelyh=',s);
write('Kol. otricatelnyh=',k);
readln
end.
0
0 / 0 / 0
Регистрация: 19.04.2016
Сообщений: 12
21.06.2016, 23:54  [ТС] 3
проект скинуть можете да?
0
northener
22.06.2016, 00:58
  #4

Не по теме:

Цитата Сообщение от Patimat Посмотреть сообщение
проект скинуть можете да?
А что тут скидывать? Сложно/трудно нажать Ctrl+C/Ctrl+V ?
Это ведь и есть полный код проекта

0
0 / 0 / 0
Регистрация: 19.04.2016
Сообщений: 12
22.06.2016, 01:09  [ТС] 5
могу конечно, но у меня дельфи не работает а программу над сдать завтра.
0
пофигист широкого профиля
4288 / 2808 / 796
Регистрация: 15.07.2013
Сообщений: 16,294
22.06.2016, 01:16 6
Ну тогда я тоже не помогу. У меня сейчас Дельфи вообще нет.
0
Модератор
62843 / 46896 / 32321
Регистрация: 18.05.2008
Сообщений: 113,631
22.06.2016, 01:26 7
Проект
0
Вложения
Тип файла: rar Числа.rar (1.7 Кб, 2 просмотров)
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
22.06.2016, 01:26

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

Получить сумму положительных и число отрицательных членов последовательности
Задание: Даны натуральное число n, целые числа a1 , .an . Получить сумму положительных и число...

Получить сумму положительных и число отрицательных членов последовательности
Одномерный массив Даны натуральные числа n, a1, a2, … ,an. В последовательности a1, a2,…,an...

Получить сумму положительных и число отрицательных членов последовательности a1,...,an
Даны натуральное число n, целые числа a1,...,an. Получить сумму положительных и число отрицательных...

Получить сумму положительных и число отрицательных членов указанной последовательности
Дано натуральное число n, целые числа a1, a2, ..., an. Получить сумму положительных и число...


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

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

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