Найти сумму и произведение его цифр
Категория: Delphi/Pascal
2011-11-20 23:37:51
Дано двузначное число.
Вывести вначале его левую цифру (десятки), а затем — его правую цифру (единицы)
Категория: Delphi/Pascal
2011-11-20 23:36:52
Дано двузначное число. Для нахождения десятков использовать операцию деления нацело, для нахождения единиц — операцию взятия остатка от деления.
Найти длину незанятой части отрезка A
Категория: Delphi/Pascal
2011-11-20 23:31:41
Даны целые положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Используя операцию взятия остатка от деления нацело, найти длину незанятой части отрезка A
Найти количество отрезков B, размещенных на отрезке A
Категория: Delphi/Pascal
2011-11-20 23:29:13
Даны целые положительные числа A и B (A > B). На отрезке длины A размещено максимально возможное количество отрезков длины B (без наложений). Используя операцию деления нацело, найти количество отрезков B, размещенных на отрезке A
Используя операцию деления нацело, найти количество полных килобайтов, которые занимает данный файл (1 килобайт = 1024 байта)
Категория: Delphi/Pascal
2011-11-20 23:27:27
Дан размер файла в байтах.
Дана масса M в килограммах. Используя операцию деления нацело, найти количество полных тонн в ней (1 тонна = 1000 кг)
Категория: Delphi/Pascal
2011-11-20 23:25:49
Дано расстояние L в сантиметрах. Используя операцию деления нацело, найти количество полных метров в нем (1 метр = 100 см)
Категория: Delphi/Pascal
2011-11-20 23:24:24
Найти решение системы линейных уравнений вида A1*x + B1*y = C1, A2*x + B2*y = C2
Категория: Delphi/Pascal
2011-11-20 23:19:23
Заданной своими коэффициентами A1, B1, C1, A2, B2, C2, если известно, что данная система имеет единственное решение.
Найти корни квадратного уравнения Ax^2+ Bx + C = 0, заданного своими коэффициентами A, B, C (коэффициент A не равен 0), если известно, что дискриминант уравнения положителен
Категория: Delphi/Pascal
2011-11-20 23:16:47
Вывести вначале меньший, а затем больший из найденных корней.
Решить линейное уравнение Ax + B = 0, заданное своими коэффициентами A и B (коэффициент A не равен 0)
Категория: Delphi/Pascal
2011-11-20 23:14:54