Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Карта форума Темы раздела Блоги Сообщество Поиск Заказать работу  
Другие темы раздела
Delphi циклические алгоритмы... https://www.cyberforum.ru/ delphi-beginners/ thread232201.html
помогите плз написать проги на циклы в Delphi Console.. а то я только на линейные и разветвляющиеся сделал, а вот циклы пока не шарю... спс заранее!!!) 1. Найти сумму чисел от 100 до 200, кратных 17. 2. С помощью оператора while напишите программу вывода всех четных чисел в диапазоне от 2 до 100 включительно. 3. Составьте программу определения наименьшего общего кратного двух натуральных...
Определить, является ли треугольник прямоугольным... Delphi
Определить, является ли треугольник со сторонами a,b,c прямоугольным (остроугольным, тупоугольным, равнобедренным, комбинацией по перечисленным признакам).
Delphi Вывести первую сотню четных чисел, не кратных трем и семи, в 10 колонок. https://www.cyberforum.ru/ delphi-beginners/ thread232173.html
Вывести первую сотню четных чисел, не кратных трем и семи, в 10 колонок.
Delphi Вывести все делители заданного натурального числа. https://www.cyberforum.ru/ delphi-beginners/ thread232171.html
Вывести все делители заданного натурального числа.
Delphi Вывести таблицу первой сотни четных квадратов целых чисел.
Вывести таблицу первой сотни четных квадратов целых чисел.
Delphi Определить, сколько чисел, являющихся квадратом целого числа, принадлежат заданному диапазону натуральных чисел. https://www.cyberforum.ru/ delphi-beginners/ thread232169.html
Определить, сколько чисел, являющихся квадратом целого числа, принадлежат заданному диапазону натуральных чисел.
Delphi Описать целую константу https://www.cyberforum.ru/ delphi-beginners/ thread232163.html
Описать целую константу и массив целых чисел с количеством элементов, определяемых этой константой. Заполнить массив случайными числами от 0 до 9 включительно и вывести на экран в 10 колонок.
Delphi Chart. Координаты тточки
ЗДравствуйте. ПРи написании программы, столкнулся с проблемой: На чарте есть готовыей график, как получить координаты курсора, относительно осей координат?? Все что я понял - это надо использовать событие OnMouseMove. Искал в гугле, перебирал варианты, но не помогало ничего(
Delphi Вывести таблицу первой сотни четных квадратов целых чисел. Вывести таблицу первой сотни четных квадратов целых чисел. https://www.cyberforum.ru/ delphi-beginners/ thread232136.html Delphi Определить три символьных переменных и присвоить им значения с клавиатуры. Вывести их по возрастанию кода символов. https://www.cyberforum.ru/ delphi-beginners/ thread232135.html
Определить три символьных переменных и присвоить им значения с клавиатуры. Вывести их по возрастанию кода символов.
Дано целое 9<N<1000000. Верно ли, что Delphi
Дано целое 9<N<1000000. Верно ли, что 1) все цифры этого числа разные? 2) если цифры числа одинаковые, то их не более двух? 3) все цифры этого числа одинаковые? 4) число является палиндромом (симметричным относительно своей середины)?
Delphi Одномерный массив подскажите пожалуйста как написать эти программы на языке Delphi 1. Одномерный массив А длиной N<=20 заполнить случайными числами из диапазона . Составить процедуру (функцию) определения: 1.1 первого минимального/максимального элемента массива; 1.2 последнего минимального/максимального элемента; а) подсчитать количество таких элементов; б) определить, на каких позициях находятся эти элементы. https://www.cyberforum.ru/ delphi-beginners/ thread232092.html
Фрилансер
Эксперт С++
5845 / 1226 / 499
Регистрация: 23.11.2010
Сообщений: 3,375
Записей в блоге: 1
21.01.2011, 19:55 0

двумерные массивы! help help help!!! вопрос жизни и смерти!!! - Delphi - Ответ 1306704

21.01.2011, 19:55. Показов 683. Ответов 3
Метки (Все метки)

Ответ

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
program Dekio;
const
n=3;
var
a :array[1..n] of integer;
b :array[1..n,1..n] of integer;
i,j :integer;
begin
randomize;
for i:=1 to n do
begin
a[i]:=random(9);
writeln('a[',i,'] = ',a[i]);
end;
for i:=1 to n do
begin
for j:=1 to n do
begin
b[i,j]:=a[i]-3*a[j];
write(b[i,j]:4);
end;
writeln;
end;
end.


Вернуться к обсуждению:
двумерные массивы! help help help!!! вопрос жизни и смерти!!! Delphi
1
Заказать работу у эксперта
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
21.01.2011, 19:55
Готовые ответы и решения:

Вопрос жизни и смерти
Дали задание в универе. В Delphi разбираюсь не очень. Прошу помощи как можно скорее. Задать...

СРОЧНО!!! вопрос жизни и смерти !
ПОМОГИТЕ ПОЖАЛУЙСТА РЕШИТЬ ЗАДАЧУ. Задача Считать из текстового файла информацию в массив...

Вопрос жизни и смерти...Помогите кто может
Здравствуйте! Надо решить одну задачку. Имеем три файла с приблизительно одинаковыми именами...

Вопрос жизни и смерти..
Парни помогите кто хорошо знает С++ просто если я к понидельнику не сдам ету програму мне прийдет...

3
21.01.2011, 19:55
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
21.01.2011, 19:55
Помогаю со студенческими работами здесь

вопрос жизни и смерти!!
Помогите с заданиями, мне очень срочно нужно!!! я боюсь меня выгонят из универа((((( ПОЖАЛУЙСТА...

Файлы.(Вопрос жизни и смерти)
Создать файл, где каждой компонентой будет массив из N чисел. Определить минимальное значение в...

Написать программу, вопрос жизни и смерти.
Дан массив А(8,8). Найти максимальный элемент среди элементов, расположенных ниже побочной...

HELP!!! Тревожная кнопка 433МГц - вопрос жизни и смерти!
Здравствуйте, радиофанаты! Вопрос жизни и смерти! (безопасности, но это иногда одно и то же) Не...

0
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2024, CyberForum.ru