Форум программистов, компьютерный форум, киберфорум
Наши страницы
Turbo Pascal
Войти
Регистрация
Восстановить пароль
 
Рейтинг 5.00/5: Рейтинг темы: голосов - 5, средняя оценка - 5.00
andru6a
0 / 0 / 0
Регистрация: 12.01.2012
Сообщений: 4
1

Вывести на экран все элементы массива, кратные М

12.01.2012, 20:16. Просмотров 867. Ответов 5
Метки нет (Все метки)

Задание в турбо паскале. Звучит следующим образом:
Вывести на экран все элементы массива, кратные М.

И еще одна задача:
Разработать программу по своему варианту находящую мах цифру строки.

Заранее при много благодарен))
0
QA
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
12.01.2012, 20:16
Ответы с готовыми решениями:

Вывести на экран элементы массива, кратные 2 и кратные 5, подсчитать их количество
задан массив из 40 элементов принадлежащих отрезку от А до Б(вводятся с клавиатуры) вывести на...

Вывести на экран элементы массива кратные 5 и их индексы
Создать двумерный целочисленный массив 5×3 Вывести на экран элементы массива кратные 5 и их...

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

Найти третий массив, в который записать сначала все кратные 4 элементы первого массива, а затем все кратные 3
4.Элементы двух массивов – целые числа в пределах от 4 до 29. Найти третий массив, в который...

Вывести на экран все отрицательные элементы массива кратные 13
В эту тему я плохо "въехал", массивы и интервалы с ними, вопщем прошу написать ответ такой задачи:...

5
SuPeR XaKer
2848 / 1977 / 788
Регистрация: 23.09.2010
Сообщений: 4,877
12.01.2012, 20:24 2
andru6a, ну ни как не можете правила форму прочесть?ну ни как....
 Комментарий модератора 
Называйте темы информативно.
1
andru6a
0 / 0 / 0
Регистрация: 12.01.2012
Сообщений: 4
12.01.2012, 22:16  [ТС] 3
Дико извиняюсь. Но дело жизни и смерти
0
Xmajs
23 / 23 / 21
Регистрация: 12.01.2012
Сообщений: 58
12.01.2012, 22:55 4
Цитата Сообщение от andru6a Посмотреть сообщение
Вывести на экран все элементы массива, кратные М.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
var a:array[1..100] of integer;
    i,k: integer;
    n: integer;
    m: integer;
begin
  randomize;
  writeln('Введите количество элементов массива: ');
  readln(n);
  writeln('Введите число M:');
  readln(m);
  for i:=1 to n do a[i]:=random(101)-25;
  writeln('Исходный массив: ');
  for i:=1 to n do write(a[i],' ');
  writeln;
  for i:=1 to n do 
    if a[i] mod m=0 then begin
      write(a[i],' ');
      inc(k);
  end;
  if k=0 then writeln('В массиве нет элементров кратных ',m);
end.
Добавлено через 9 минут
Цитата Сообщение от andru6a Посмотреть сообщение
Разработать программу по своему варианту находящую мах цифру строки.
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
var
  s: string;
  i: integer;
  max: char;
 
begin
  writeln('Введите строку: ');
  readln(s);
  for i := 1 to length(s) do
    if s[i] in ['0'..'9'] then
      if Ord(max) < ord(s[i]) then max := s[i];
  writeln('Максималная цифра строки: ', max)
end.
1
andru6a
0 / 0 / 0
Регистрация: 12.01.2012
Сообщений: 4
12.01.2012, 23:04  [ТС] 5
БЛАГОДАРЮ
 Комментарий модератора 
Если какой-либо пост на форуме показался вам полезным, нажмите кнопку "Спасибо" внизу самого поста.
0
andru6a
0 / 0 / 0
Регистрация: 12.01.2012
Сообщений: 4
18.01.2012, 17:25  [ТС] 6
Вот еще две программы.
1ая...вывести из строки символы, у которых max и min в строке код.


2ая..вывести на экран символы, у которых код равен среднему арифметическому минимума и максимума кода строки.
0
18.01.2012, 17:25
Answers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
18.01.2012, 17:25

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

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

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

Дан массив из указателей на целые числа, вывести все члены данного массива, кратные 3, кратные 5
Дан массив из указателей на целые числа вывести все члены данного массива кратные 3 , кратные 5...


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

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

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