Форум программистов, компьютерный форум, киберфорум
Delphi: FireMonkey
Форум программистов и сисадминов Киберфорум > Форум программистов > Delphi > Delphi: FireMonkey
Войти
Регистрация
Восстановить пароль
Блоги Социальные группы Поиск Сообщения за день Заказать работу  
 
0 / 0 / 0
Регистрация: 13.10.2016
Сообщений: 2

Найти в массиве 15х15 числа являющиеся степенью 2 и вывести их

24.11.2016, 11:45. Показов 881. Ответов 0
Метки stringgrid, массив, степень (Все метки)
Студворк — интернет-сервис помощи студентам
Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18

procedure TForm1.Button3Click(Sender: TObject);
 
      begin
        //Перепишем данные StringGrid в массив
          For i:=0 to 14  do
          For j:=0 to 14  do
          a[j,i]:=strtoint(StringGrid1.Cells[i,j]);
 
          //Найдем числа степени 2
          For i:=0 to 14  do
          For j:=0 to 14  do
          while a[j,i] > 1 do
              begin
              if a[j,i] mod 2 = 1 then break;
              a[j,i]:= a[j,i] div 2
              end;
          label2.Text:=IntToStr(a[j,i]);
      end;
Выводит 0
0
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
 24.11.2016, 11:45
Ответы с готовыми решениями:

В массиве из n чисел найти числа с суммой цифр равной 9 и являющиеся степенью 3
в массиве из n чисел найти числа суммой цифр равной 9 и являющиеся степенью 3 заранее спасибо Добавлено через 14 минут помогите...

Определить числа являющиеся степенью пятерки
Даны натуральное число n и целые числа A1...An. Определить числа являющиеся степенью пятерки. Определить процедуру, позво¬ляющую...

Найти количество чисел являющиеся степенью двойки
Задано целое число n . Вам необходимо найти количество таких чисел x , что x<=n, x — степень двойки. Формат ввода В единственной...

0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
 24.11.2016, 11:45
Помогаю со студенческими работами здесь

В целочисленном массиве найти и напечатать те элементы, которые являются степенью 2. Написать функцию, проверяющую, является ли число степенью 2.
В целочисленном массиве найти и напечатать те элементы, которые являются степенью 2. Написать функцию, проверяющую, является ли число...

Найти и вывести на экран все трёхзначные числа, являющиеся палиндромами
Помогите, пожалуйста, решить задачи на паскале, я новичок и он мне очень трудно дается. Плиииииз. 1. Найти и вывести на экран все...

Найти и вывести первое число большее n (вводится), которое является степенью натурального числа 2.9
Найти и вывести первое число большее n (вводится), которое является степенью натурального числа 2...9

Найти сумму чисел в массиве, перемножить все числа в массиве и вывести в результат в консоль
Не могу разобраться, если не сложно подскажите Дана переменная massiv, которая является массивом и состоит из чисел 1, 50, 3, 66, 99,...

Найти простые числа в двухмерном массиве и вывести номера столбцов в которых больше чем 2 числа
У меня как бы задание из 2-мерного массива найти простые числа и вывести номера столбцов в которых больше чем 2 простых числа где они...


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

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

Новые блоги и статьи
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
Отчёт о спецтехнике находящейся в ремонте
Maks 20.04.2026
Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .
Памятка для бота и "визитка" для читателей "Semantic Universe Layer (Слой семантической вселенной)"
Hrethgir 19.04.2026
Сгенерировано для краткого описания по случаю сборки и компиляции скелета серверного приложения. И пусть после этого скажут, что статьи сгенерированные AI - туфта и не интересно. И это не реклама -. . .
Запрет удаления строк ТЧ документа при определённом условии
Maks 19.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа "Аккумуляторы", разработанного в конфигурации КА2. У данного документа есть ТЧ, в которой в зависимости от прав доступа. . .
Модель заражения группы наркоманов
alhaos 17.04.2026
Условия задачи сформулированы тут Суть: - Группа наркоманов из 10 человек. - Только один инфицирован ВИЧ. - Колются одной иглой. - Колются раз в день. - Колются последовательно через. . .
Мысли в слух. Про "навсегда".
kumehtar 16.04.2026
Подумалось тут, что наверное очень глупо использовать во всяких своих установках понятие "навсегда". Это очень сильное понятие, и я только начинаю понимать край его смысла, не смотря на то что давно. . .
My Business CRM
MaGz GoLd 16.04.2026
Всем привет, недавно возникла потребность создать CRM, для личных нужд. Собственно программа предоставляет из себя базу данных клиентов, в которой можно фиксировать звонки, стадии сделки, а также. . .
Знаешь почему 90% людей редко бывают счастливыми?
kumehtar 14.04.2026
Потому что они ждут. Ждут выходных, ждут отпуска, ждут удачного момента. . . а удачный момент так и не приходит.
КиберФорум - форум программистов, компьютерный форум, программирование
Поддержать - Реклама - Условия использования - Обратная связь
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru