Pascal ABC

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

Войти

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

Другие темы раздела
Pascal ABC Определить, является ли введённый год високосным https://www.cyberforum.ru/ pascalabc/ thread769875.html 3.Дано целое положительное число, соответствующее номеру года. Напишите программу, позволяющую определить является ли введённый год высокосным. Год является високосным, если его номер кратен 4, но из...	Реализовать игру "Морской бой" Pascal ABC Реализовать игру "Морской бой" на паскале.
Pascal ABC Найти периметр и площадь треугольника по данным трем сторонам 1.Даны действительные положительные числа а,в,с, которые являются длинами сторон треугольника. Напишите программу, позволяющую найти периметр треугольника и площадь треугольника. https://www.cyberforum.ru/ pascalabc/ thread769860.html	Pascal ABC Одномерный массив: вставить нулевой элемент в пятую позицию https://www.cyberforum.ru/ pascalabc/ thread769761.html вставить нулевой элемент в пятую позицию.при этом все элементы начиная с пятого должны сдвинуться на одну позицию вперед. Голова отказывается соображать совсем...хотя знаю что это дико просто)))))
Определить, на какой диагонали матрицы находится наибольшая сумма цифр. Транспонировать матрицу Pascal ABC заполнить двумерный массив (матрицу) разностью N*N (величина задана в разделе констант) случайными цифрами. а) определить на какой диагонали матрицы находится наибольшая сумма цифр б)...	Pascal ABC Поиск элементов с заданными свойствами, арифметические действия с элементами массива https://www.cyberforum.ru/ pascalabc/ thread769659.html Создать одномерный массив размерностью 10. Заполнить его генератором случайных чисел це- лыми числами в диапазоне от 0 до 100. а) найти минимальный элемент массива, б) разницу между максимальным и...
Pascal ABC Определить, есть ли в массиве строка с равным количеством положительных и отрицательных элементов Дана матрица D размера nхm( n,m, х массива: А - из элементов матрицы D, лежащих в диапазоне от -5 до 5, в порядке следования по строкам, В - из элементов от 10 до 20, С - от 30 до 50. Использовать... https://www.cyberforum.ru/ pascalabc/ thread769652.html	В третий массив разместить только максимальные элементы из соответствующих позиций двух исходных массивов Pascal ABC Объявить три одномерных массива целых чисел одинаковой размерностью. Заполнить первый и второй массивы генератором случайных чисел. В третий массив разместить только максимальные элементы из...
Pascal ABC программа пррверки правильности оператора case https://www.cyberforum.ru/ pascalabc/ thread769645.html программа проверки правильности оператора case с переменной-селектором типа integer(без else), в который вложены операторы вывода на экран строковых констант. Помогите, если не сдам, до экзамена...	Pascal ABC Найти сумму элементов одномерного массива целых чисел Найти сумму элементов одномерного массива целых чисел А(20). Массив заполнить случайными числами. Исходный массив вывести в одну строку https://www.cyberforum.ru/ pascalabc/ thread769642.html
Заполнить двумерный массив таблицей умножения Pascal ABC Создать двумерный массив и заполнить его таблицей умножения. Результат вывести на экран	Pascal ABC Поменять значения элементов местами Заполнить два одномерных массива одинаковой размерности случайными целыми числами в диапазоне от 0 до 100. Поменять значения элементов местами (то есть первый элемент первого массива записывается... https://www.cyberforum.ru/ pascalabc/ thread769628.html

Новичок

1642 / 1091 / 487

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

Сообщений: 5,345

23.01.2013, 18:02

Определить двухзначное число, в котором число десятков соответствует первой цифре заданного числа, а число единиц-последней - Pascal ABC - Ответ 4043570

23.01.2013, 18:02. Показов 3218. Ответов 2

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

Ответ

Pascal

program dv;
uses Crt;
var a,b:longint;
begin
ClrScr;
Write('Введите четырехзначное число:');
Read(a);
if a div 1000>9 then Writeln('Введенное число не является четырехзначным!!!') else
begin
b:=a div 1000*10+a mod 10;
Writeln('Число образованное первой и последней цифрой:',b);
end;
Readln;
end.

Вернуться к обсуждению:
Определить двухзначное число, в котором число десятков соответствует первой цифре заданного числа, а число единиц-последней Pascal ABC

Programming

Эксперт

94731 / 64177 / 26122

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

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

23.01.2013, 18:02

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

Дано двухзначное число. Найти число десятков, число единиц в нем, произведение его цифр
Помогите плиз=)) Дано двухзначное число. Найти число десятков ,число едениц в нем, произвеление его...

Дано двухзначное число. Найти число десятков и единиц в нем
Помогите, пожалуйста с решением такой задачи: "Дано двухзначное число. Найти число десятков и...

С клавиатуры вводится целое двухзначное число Х. Определить сколько десятков и единиц в Х
С клавиатуры вводится целое двухзначное число Х. Определить сколько десятков и единиц в Х.

После каждого числа n, в котором число десятков меньше числа единиц, вставьте n
С клавиатуры вводится одномерный массив целых чисел: сначала вводится количество элементов в...

IT_Exp

Эксперт

87844 / 49110 / 22898

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

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

23.01.2013, 18:02

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

Дано трёхзначное число. Определить число, полученное перестановкой цифр десятков и единиц
1.Дано трёхзначное число. Определить число, полученное перестановкой цифр десятков и единиц.

Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц исходного числа (например, 123
Задание: Дано трехзначное число. Вывести число, полученное при перестановке цифр десятков и единиц...

Дано двухзначное число. Получить число, образованное при перестановке цифр заданного числа
Дано двухзначное число. Получить число, образованное при перестановке цифр заданного числа.

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

Наверх