Форум программистов, компьютерный форум, киберфорум
Pascal ABC
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.66/32: Рейтинг темы: голосов - 32, средняя оценка - 4.66
0 / 0 / 0
Регистрация: 25.04.2011
Сообщений: 6
1

Дан массив целых чисел. Вывести индексы тех элементов, значения которых кратны 3 и 5

25.04.2011, 18:40. Показов 5841. Ответов 3
Метки нет (Все метки)

1)Дан массив целых чисел. Вывести индексы тех элементов, значения которых кратны 3 и 5
2)Определить, есть ли пара соседних элементов с суммой, равной заданному числу А

Народ только сказали, чтобы массив автоматически выводился и желательно проверьте сами.. а то я вообще не понимаю в этом..

Добавлено через 1 час 3 минуты
ну помогите народ оч срочно надо..
0

Помощь в написании контрольных, курсовых и дипломных работ здесь.

Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
25.04.2011, 18:40
Ответы с готовыми решениями:

Дан массив целых чисел, состоящий из 15 элементов. Вывести индексы тех элемемтов, значения которых кратны 3 и 5
помогите пожалуйста скорее!буду очень признателен!!

дан массив целых чисел. найти кол-во элементов, значения которых положительны и не превосходят заданного числа A.
6.дан массив целых чисел. найти кол-во элементов, значения которых положительны и не превосходят...

Дан массив из N элементов. Определить произведение тех элементов, которые кратны заданному числу Р.
Дан массив из N элементов. Определить произведение тех элементов, которые кратны заданному числу Р....

Найти произведение тех элементов массива значения которых заключены в интервале [А, В] и кратны 3 или 5
Нужно сделать две программы: Дан массив X(N). 1) Найти произведение тех элементов массива...

3
23 / 22 / 29
Регистрация: 16.12.2010
Сообщений: 71
25.04.2011, 19:14 2
1)
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
35
36
37
38
39
uses crt;
 type
 mas=array[1..3,1..5] of integer;
var
 i,j:integer;
 x:mas;
 k,l:integer;
begin
clrscr;
for i:= 1 to 3 do
begin
for j:=1 to 5 do
begin
 x[i,j]:=random(20);
 write(x[i,j]:4);
end;
writeln;
end;
k:=1;
l:=1;
for i:= 1 to 3 do
begin
for j:=1 to 5 do
if x[i,j] mod 3=0  then
begin
 k:=i;
 l:=j;
 writeln('Êðàòíîå 3-ì[',k,',',l,']');
end;
end;
for i:= 1 to 3 do
for j:=1 to 5 do
if x[i,j] mod 5=0  then
begin
 k:=i;
 l:=j;
 writeln('Êðàòíîå 5-è[',k,',',l,']');
end;
end.
2 задачу тоже масссивом или нет
1
0 / 0 / 0
Регистрация: 25.04.2011
Сообщений: 6
25.04.2011, 19:18  [ТС] 3
Спс за 1, 2 задачу тоже массивом)
0
0 / 0 / 0
Регистрация: 09.11.2016
Сообщений: 2
10.11.2016, 16:29 4
Добавлено через 12 минут
EvilScream,
Цитата Сообщение от EvilScream Посмотреть сообщение
writeln('ГЉГ°Г*ГІГ*îå 3-Г¬[',k,',',l,']');
Цитата Сообщение от EvilScream Посмотреть сообщение
writeln('ГЉГ°Г*ГІГ*îå 5-ГЁ[',k,',',l,']');
Что в скобках,скажи пожалуйста!
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
10.11.2016, 16:29

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

Найти произведение тех элементов массива, значения которых заключены в интервале [A; B] и кратны 3 или 5
Нужна блок-схема и программа Дан массив X(N).найти произведение тех элементов массива, значения...

Дан массив целых чисел. Найти элементы, которые кратны 3 и 7
дан массив целых чисел найти элементы которые положительны кратны 3 и 7

Заменить единицами сроку и столбец, содержащие максимальный среди тех элементов, значения которых кратны двум
Ввести целочисленный двумерный массив , вывести его. Заменить единицами сроку и столбец,...

Одномерный массив. Вывести на экран элементы, значения которых являются квадратами целых чисел.
составьте программу ввода с клавиатуры элементов массива a и вывода на экран элементов, значения...


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

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

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