Форум программистов, компьютерный форум CyberForum.ru

Delphi: FireMonkey

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

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

24.11.2016, 11:45. Просмотров 251. Ответов 0

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
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
24.11.2016, 11:45     Найти в массиве 15х15 числа являющиеся степенью 2 и вывести их
Посмотрите здесь:

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

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

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

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

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

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

Массив и число являющиеся или нет степенью элементов массива - Python
Смотрите,вводится массив из 5 элементов и после него число b. Нужно прокрутить массив циклом for и вывести одно число k - количество...

Даны числа a и b. Необходимо найти все числа, являющиеся полными квадратами, на отрезке [a;b] - C++
Даны числа a и b. Необходимо найти все числа, являющиеся полными квадратами, на отрезке . Формат входных данных Вводится два...

Вывести числа в пятеричной системе, не являющиеся троичными. - C (СИ)
Задание такое. Вывести числа в пятеричной системе, не являющиеся троичными. Т.е ввели Ввод. 12 34 31 87 18 1234 3457 ...

Элементы массива, являющиеся цифрами числа n, вывести на экран - C#
Дано натуральное число n (n <= 999999). Заполнить массив его цифрами, расположенными в об¬ратном порядке (первый элемент равен последней...


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

Или воспользуйтесь поиском по форуму:
После регистрации реклама в сообщениях будет скрыта и будут доступны все возможности форума.
Ответ Создать тему
Опции темы

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