Форум программистов, компьютерный форум, киберфорум
Наши страницы

Pascal (Паскаль)

Войти
Регистрация
Восстановить пароль
 
Solnze
0 / 0 / 0
Регистрация: 31.05.2010
Сообщений: 18
#1

Массивы - Pascal

02.06.2010, 09:35. Просмотров 280. Ответов 1
Метки нет (Все метки)

Даны натуральные числа a1, a2, ..., an. Указать те, у которых остаток от деления на М равен L (0 ≤ L ≤ М – 1).
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
02.06.2010, 09:35
Здравствуйте! Я подобрал для вас темы с ответами на вопрос Массивы (Pascal):

Даны массивы а и b. Получить новые массивы a и b, элементы которых вычисляются по правилу: ai=bi, bi= -ai - Pascal
Даны массивы а и b, состоящие из n-элементов каждый. Получить новые массивы a и b, элементы которых вычисляются по правилу: ai=bi, bi=...

массивы - Pascal
В двумерном массиве произвольных чисел найти четные элементы и вывести их как одномерный массив подскажите :-[

массивы - Pascal
помогите пожалуйста) в одномерном массиве упорядочить только четные элементы в порядке убывания любым методом, оставив нечетные на своих...

Массивы - Pascal
Дана матрица, состоящая из n строк и n столбцов или одномерные массивы из n элементов каждый. Согласно предложенному варианту задания,...

Массивы. - Pascal
помогите решить задачи! препод плохо обьясняет! 1) для массива состоящего из 10 целых чисел подсчитать кол-во элементов в интервале...

массивы - Pascal
Доброго времени суток всем! Прошу помощи с массивами. Задание ниже

1
unick12345
1315 / 1006 / 58
Регистрация: 27.03.2009
Сообщений: 3,748
02.06.2010, 09:46 #2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 var i,l,m,n:integer;a:array[1..1000] of integer;
begin
readln(n);
readln(m);
repeat
readln(l);
until (l>=0) and (l<=m-1);
for i:=1 to n do
begin
readln(a[i]);
if a[i] mod m=l then writeln(a[i]);
end;
readln;
end.
0
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
02.06.2010, 09:46
Привет! Вот еще темы с ответами:

Массивы 5з - Pascal
Вот еще одна задачка с моего варианта... Дана последовательность х1,х2,…,хn. Найти номер элемента, который отличается от среднего...

массивы - Pascal
ребят послезавтра зачет я уже 2 дня ломаю голову над след. задачами а вам наверно делов на 5 минут.. 1 Массив вещественных чисел A(N)...

Массивы - Pascal
Написать программу, которая заменяет все заглавные буквы строчными, а строчные – заглавными в заданной символьной строке. вот программа! ...

Массивы - Pascal
Program elem; uses crt; const n=12;m=10;p=120; type tvector=array of integer; var a:array of integer; ...


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

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

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