Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.91/11: Рейтинг темы: голосов - 11, средняя оценка - 4.91
0 / 0 / 0
Регистрация: 17.05.2015
Сообщений: 16

Выведите на экран одномерный массив, раскрасив в нем синим цветом элементы, кратные 4

19.05.2015, 23:25. Показов 2281. Ответов 1
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Выведите на экран одномерный массив, раскрасив в нем синим цветом элементы, кратные 4.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
19.05.2015, 23:25
Ответы с готовыми решениями:

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

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

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

1
 Аватар для JuriiMW
5095 / 2661 / 2355
Регистрация: 10.12.2014
Сообщений: 10,060
20.05.2015, 11:02
Лучший ответ Сообщение было отмечено Blaze225 как решение

Решение

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
uses
  Arrays, CRT;
  
var
  A : array of Integer;
  
begin
  TextColor(14);
  var N := ReadInteger('N =');
  A := CreateRandomIntegerArray(N, 1, 99);
  TextColor(7);
  for var i := 0 to N-1 do
    if A[i] mod 4 = 0 then
      begin
        TextColor(9);
        Print(A[i]);
        TextColor(7);
      end
    else
      Print(A[i]);
  WriteLn;
end.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
20.05.2015, 11:02
Помогаю со студенческими работами здесь

Выведите на экран одномерный массив раскрасив в нем зеленым цветом последний элемент
Выведите на экран одномерный массив раскрасив в нем зеленым цветом последний элемент который находится в интервале Program P9; Uses...

Выведите на экран одномерный массив, раскрасив в нем бирюзовым цветом минимальный и максимальный элемент
одномерный массив .1) Осуществите перестановку местами максимального и минимального элементов. массива.2) Выведите на экран одномерный...

Вывести на экран массив, раскрасив красным цветом - первый элемент > 0, синим – элементы < 0
Вывести на экран одномерный массив, из 10 элементов, раскрасив в нем красным цветом первый положительный элемент, синим цветом –...

Вывести на экран одномерный массив, раскрасив в нём зелёным цветом минимальный элемент
Сможете помочь с этим заданием? А то никак не выходит( Вот шапка: uses crt; Type Mas = array of integer; var G:mas; i:integer; ...

Вывести на экран одномерный массив, раскрасив в нем зеленым цветом последний отрицательный элемент
Вывести на экран одномерный массив, раскрасив в нем зеленым цветом последний отрицательный элемент.


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

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Новые блоги и статьи
Жизнь в неопределённости
kumehtar 23.03.2026
Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .
Модель здравоСохранения: работники работают быстрее после её введения.
anaschu 23.03.2026
geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .
1С: Контроль уникальности заводского номера
Maks 23.03.2026
Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью. Данные берутся из регистра сведений, по которому настроено. . .
Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения
anaschu 22.03.2026
e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git
1С: Программный отбор элементов справочника по группе
Maks 22.03.2026
Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию группы. . .
Как я обхитрил таблицу Word
Alexander-7 21.03.2026
Когда мигает курсор у внешнего края таблицы, и нам надо перейти на новую строку, а при нажатии Enter создается новый ряд таблицы с ячейками, то мы вместо нервных нажатий Энтеров мы пишем любые буквы. . .
Krabik - рыболовный бот для WoW 3.3.5a
AmbA 21.03.2026
без регистрации и смс. Это не торговля, приложение не содержит рекламы. Выполняет свою непосредственную задачу - автоматизацию рыбалки в WoW - и ничего более. Однако если админы будут против -. . .
1С: Программный отбор элементов справочника по значению перечисления
Maks 21.03.2026
Установка программного отбора элементов справочника "Сотрудники" из модуля формы документа. В качестве фильтра для отбора служит значение перечислений. / / Событие "НачалоВыбора" реквизита на форме. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru