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

Задача с одномерным массивом

10.02.2016, 10:59. Просмотров 382. Ответов 8
Метки нет (Все метки)

Помогите решить пожалуйста.
Дан массив А(10). Вычислить сумму элементов массива кратных трем и их количество.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
10.02.2016, 10:59
Ответы с готовыми решениями:

Задача с одномерным массивом
Добрый день. Помогите, пожалуйста, решить задание: Известно, что в одномерном...

Работа с одномерным массивом
Здравствуйте, есть пара задач. 1. Разделить все четные элементы массива на...

работа с одномерным массивом
помогите массив я сделала а как выполнить условия совсем не пойму. Дан массив...

Работа с одномерным массивом
Добрый день. Возникла проблема при написании программы, обрабатывающий...

Помогите с ОДНОМЕРНЫМ массивом)
Дан одномерный массив H(n), заполненными случайными целыми числами от -F до F....

8
qwertehok
2309 / 2213 / 602
Регистрация: 29.08.2013
Сообщений: 14,795
10.02.2016, 11:02 2
покажите что не получается
0
Tillka
0 / 0 / 0
Регистрация: 05.02.2016
Сообщений: 14
10.02.2016, 11:06  [ТС] 3
Я не знаю как оформляются сами массивы и Randomize.
0
qwertehok
2309 / 2213 / 602
Регистрация: 29.08.2013
Сообщений: 14,795
10.02.2016, 11:10 4
Цитата Сообщение от Tillka Посмотреть сообщение
Я не знаю как оформляются сами массивы
откройте учебник

Цитата Сообщение от Tillka Посмотреть сообщение
Randomize.
а он вам зачем?
0
Tillka
0 / 0 / 0
Регистрация: 05.02.2016
Сообщений: 14
10.02.2016, 11:33  [ТС] 5
Randomize для того, чтобы числа выводились рандомно. Их пользователь не вводит
0
qwertehok
2309 / 2213 / 602
Регистрация: 29.08.2013
Сообщений: 14,795
10.02.2016, 11:43 6
Цитата Сообщение от Tillka Посмотреть сообщение
Randomize для того, чтобы числа выводились рандомно.
хорошо

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
var i,s,k:integer;
a:array[1..10] of integer;
begin
randomize;
s:=0; // сумма
k:=0; // количество
  
for i:=1 to 10 do begin
  a[i]:=random(10);
  если a[i] кратно трем то 
    увеличить k на 1
    увеличить сумму на сумму + a[i]
end;
 
showmesage('сумма='+IntToStr(s)+#10#13+'количество='+IntToStr(k));
end;
1
Tillka
0 / 0 / 0
Регистрация: 05.02.2016
Сообщений: 14
10.02.2016, 11:50  [ТС] 7
Спасибо за решение.
0
qwertehok
2309 / 2213 / 602
Регистрация: 29.08.2013
Сообщений: 14,795
10.02.2016, 11:55 8
Tillka, это не полное решение
0
Tillka
0 / 0 / 0
Регистрация: 05.02.2016
Сообщений: 14
10.02.2016, 11:58  [ТС] 9
Я понял, дальше сам разберусь.
0
10.02.2016, 11:58
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
10.02.2016, 11:58

Операции с одномерным массивом
Задание: Организвать заполнение массива случайными числами из диапазона от 1 до...

работа с одномерным массивом, компонента тмемо
Дан миссив натуральных чисел А(10). Найти сумму элементов, кратных данному К. ...

работа с одномерным массивом, компонента ТМЕМО
При поступлении в вуз абитуриенты, получившие "двойку" на первом экзамене, ко...


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

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

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