Pascal ABC

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
Pascal ABC шейкерная сортировка Отсортировать строки массива целых чисел по убыванию. Шейкерная сортировка https://www.cyberforum.ru/ pascalabc/ thread722674.html	Pascal ABC 21. Дана матрица размера 5 x 10. Поменять местами первый столбец с номером один и первый из столбцов, содержащий только положительные элементы 21. Дана матрица размера 5 x 10. Поменять местами первый столбец с номером один и первый из столбцов, содержащий только положительные элементы.
Pascal ABC Составить блоксхемы 1.Дана символьная строка. Слово - последовательность символов между пробелами,не содержащее пробелы внутри себя. Определить длинну самого короткого слова. 2. Имеем текст на кириллице, который заканчивается точкой. Слова отделяются одним пробелом. Гласные буквы : А,Е,I,И,О,У,Ю,Я; звонкие согласные : Б,В,Г,Д,Ж,З,Л,М,Н,Г; глухие согласные: К,П,С,Т,Ф,Х,Ц,Ч,Ш,Щ. Написать в алфавитном порядке: Все... https://www.cyberforum.ru/ pascalabc/ thread722596.html	Pascal ABC Массив из цифр чисел в диапазоне https://www.cyberforum.ru/ pascalabc/ thread722561.html Здравствуйте! Помогите пожалуйста с задачкой: Даны числа от a до b. Создать массив из цифр всех чисел диапазона от a до b. Т.е. если числа 152 и 153, то это шесть элементов массива: n=1 n=5 n=2 n=1 n=5 n=3 и т.д. Какой код должен быть??? Спасибо!!!
Pascal ABC Вставить надпись в картинку помогите срочно нужно сделать анимацию........ код есть а вот как в него текст вставить не могу понять вот код программы картинка с программы снизу. program ty; uses GraphABC; type mysma = record x, y : integer; dy, dx : integer; end;	Pascal ABC Треугольник задан координатами вершин , найти сумму длин сторон. (procedure) https://www.cyberforum.ru/ pascalabc/ thread722533.html L1=(sqrt)(x1-x2)+(y1-y2) L1=(sqrt)(x2-x3)+(y2-y3) L1=(sqrt)(x3-x1)+(y3-y1) 2) S=L1+L2+L3 Через procedure! вот начала должно быть таким
Pascal ABC Сделать анимацию https://www.cyberforum.ru/ pascalabc/ thread722507.html есть ваши исходники nyan cat я хочу сделать анимацию - помогите :)uses graphABC; const cv:array of integer=($993300,clRed,$00bbff,clYellow,$66ff33,$ff9933,clBlue,clBlack, $00ccff,$ff99ff,clFuchsia,clLtGray,clWhite,$ccccff,clAqua); a:array of byte=((1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,1,8,8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8, 8,8,8,1,1,1,1,1,1,1,1), ...	дана матрица А из целых чисел размером MxN .Переставить строки матрицы так,чтобы строки стали расположены Pascal ABC дана матрица А из целых чисел размером MxN .Переставить строки матрицы так,чтобы строки стали расположены по убыванию в лексиографичеком порядке
Pascal ABC Сортировка двумерного массива методом прямого выбора https://www.cyberforum.ru/ pascalabc/ thread722469.html Здраствуйте, вот моя задача: Дана матрица x. Упорядочить элементы строк матрицы по убыванию, а сами строки по возрастанию элементов 10-го столбца. (использовать сортировку выбором). Без функций и процедур. Не заставляю писать весь код, а только часть,а именно: Как с помощью сортировки выбором упорядочить все строки матрицы по убыванию?	Pascal ABC Найти количество элементов массива, кратных пяти https://www.cyberforum.ru/ pascalabc/ thread722407.html Решите пожалуйста вот эти задачи. Очень прошу. №2 Задать случайным образом одномерный массив из 10 целочисленных элементов, принадлежащих отрезку . Найти количество элементов массива, кратных пяти. Закрасить указанные элементы. Составить* программу вычисления, A - сумма положительных элементов массива; B - наименьший элемент массива; C - произведение элементов массива с нечетными...
Упорядочить элементы строк матрицы, используя алгоритм Шелла Pascal ABC Дана матрица размера M×N. Упорядочить элементы ее строк, используя алгоритм Шелла. Направление сортировки выбирает пользователь.	Pascal ABC Найти сумму элементов матрицы, расположенных во втором столбце Решите пожалуйста вот эти задачи. Очень прошу. №3 Найти сумму элементов матрицы, расположенных во втором столбце. Закрасить указанные элементы. Вычислить произведение положительных элементов матрицы, расположенных на главной диагонали и выше ее. Закрасить указанные элементы. Полное задание:http://files.etherway.ru/8184F https://www.cyberforum.ru/ pascalabc/ thread722404.html

Puporev

Почетный модератор

64288 / 47587 / 32739

Регистрация: 18.05.2008

Сообщений: 115,182

07.12.2012, 12:21

Введенные числа распечатать в обратном порядке - Pascal ABC - Ответ 3816983

07.12.2012, 12:21. Показов 1758. Ответов 1

Метки (Все метки)

Сообщение было отмечено Памирыч как решение

Решение

Pascal

uses crt;
procedure chisla;
var a: integer;
begin
clrscr;
writeln('Введите число');
readln(a);
if a <> 0 then
 begin
  chisla;
  writeln(a);
 end;
end;
 
begin
  chisla;
end.

Вернуться к обсуждению:
Введенные числа распечатать в обратном порядке Pascal ABC

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

07.12.2012, 12:21

Готовые ответы и решения:

Записать числа в обратном порядке, при этом переставив все цифры в каждом числе в обратном порядке
Вводится 5 чисел. Требуется записать их в обратном порядке, при этом переставив все цифры в каждом...

Распечатать список в обратном порядке
распечатать список в обратном порядке(с помощью рекурсии)

Распечатать их в обратном порядке по 6 чисел в строке
Дано 100 целых чисел. Распечатать их в обратном порядке по 6 чисел в строке.

Рекурсия: введенные числа распечатать в обратном порядке
Написать рекурсивную процедуру, которая считывает вводимые с клавиатуры числа до тех пор, пока не...

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

07.12.2012, 12:21

Помогаю со студенческими работами здесь

Распечатать элементы массива в обратном порядке по 4 числа в строке
Дан массив целых чисел, состоящий из 44 целых элементов из диапазона от -45 до 55,введенных...

Переписать введенные буквы в алфавитном порядке, а числа в порядке возрастания
Ввести последовательность, состоящая из букв латинского алфавита и целых чисел, меньших 50...

Рекурсия: введенные числа распечатать в обратном порядке
Написать рекурсивную процедуру, которая считывает вводимые с клавиатуры числа до тех пор, пока не...

Используя стек вывести числа введенные пользователем в обратном порядке.
помогите плиз решить задачу......Используя стек вывести числа введенные пользователем в обратном...

Наверх