Turbo Pascal

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

Войти

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

Другие темы раздела
Turbo Pascal Написать программу, которая вычисляет значение выражения u = max(x,y,z)^2 - min(x,y,z)^2 / (max(x,y,z) + min(x,y,z))^2 Написать программу которая проверяет по заданным трем значениям x,y,z и вычисляет следующее выражение u={max}^{2}(x,y,z)-{min}^{2}(x,y,z)/{(max(x,y,z)+min(x,y,z))}^{2} https://www.cyberforum.ru/ turbo-pascal/ thread2520316.html	Turbo Pascal Ввести таблицу А(4,6) и натуральные числа К, Р (1<=К<Р<=6). Поменять в таблице К-й и Р-й столбцы Ввести таблицу А(4,6) и натуральные числа К, Р (1<=К<Р<=6). Поменять в таблице К-й и Р-й столбцы
Turbo Pascal Дана таблица У(5,5). Сформировать таблицу X при условии Дана таблица У(5,5). Сформировать таблицу X при условии: X(I,J)= 1/(Y(I,J)+ ABS(Y(I,J))), где I - четное; X(I,J)=SQRT(EXP(Y(I,J)), где I - нечетное. https://www.cyberforum.ru/ turbo-pascal/ thread2520090.html	Turbo Pascal сформировать динамический строку вывести его на печать и проверить начинается и заканчивается буквой "Y" https://www.cyberforum.ru/ turbo-pascal/ thread2519945.html сформировать динамический строку вывести его на печать и проверить начинается и заканчивается буквой "Y"
Turbo Pascal Вычислить сумму ряда Дано натуральное n. Получить: \left(\frac{1}{1} \right)^n+\left(\frac{1}{2} \right)^{n-1}+...+\left(\frac{1}{n} \right)^1	Turbo Pascal Вычисление формулы https://www.cyberforum.ru/ turbo-pascal/ thread2519595.html Помогите вычислить формулу. S=\sum_{k=1}^{10}\frac{\sum_{n=1}^{k}\sin kn}{k!}
Turbo Pascal Скалярное произведение Вычислить скалярное произведение s. s=(Aq+p,Aq) Исходные данные. А= B = https://www.cyberforum.ru/ turbo-pascal/ thread2519410.html	Turbo Pascal Вывести на печать номера элементов массива, которые меньше последнего, и их число Дан массив С(m), m=<15. Вывести на печать номера тех элементов массива, которые меньше последнего, и их число, а также вывести на печать элементы массива С.
Turbo Pascal Найти произведение всех целых чисел от А до В включительно Даны два целых числа А и В (А<В). Найти произведение всех целых чисел от А до В включительно. Составить блок-схему. https://www.cyberforum.ru/ turbo-pascal/ thread2519394.html	Turbo Pascal Переместиться вправо https://www.cyberforum.ru/ turbo-pascal/ thread2519343.html Задача: Вы разрабатываете фрагмент редактора текста. Ваш фрагмент поддерживает возможность перемещения курсора вправо. - Нажатие на клавишу «вправо» перемещает курсор на один символ вправо. Если курсор находится на самой правой позиции строки, то он переходит на первый символ следующей строки (если она есть. Курсор остается неподвижным, если он находится в правой-нижней позиции). Вам...
Квадрат в прямоугольнике Turbo Pascal Задача: У Вас в руках карта местности, представленная решеткой N*M символов. Выведите прямоугольник - фрагмент этой карты, с левым верхним углом в позиции R,C (R - номер строки, C - номер столбца) с стороной L. Формат ввода: N M – количество строк(N) и столбцов(M) (N<=16, M<=20) s - первая строка карты s - вторая строка карты ... s - последняя строка карты	Turbo Pascal Составить блок схему алгоритма и программу для вычисления функции https://www.cyberforum.ru/ turbo-pascal/ thread2519039.html Помогите cоставить блок схему алгоритма и программу для вычисления функции по формуле для произвольных исходных данных, с двойной точностью. просьба разжевать. нуб в этом деле

mr-Crocodile

3048 / 1668 / 656

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

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

28.10.2019, 14:56

Определить номер минимальной цифры числа - Turbo Pascal - Ответ 13942338

28.10.2019, 14:56. Показов 1800. Ответов 5

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

Ответ

Pascal

repeat 
  ReadLn(N);
until N>0;
sum=0;
min=10; {минимальная цифра не может быть больше 9}
while N>0 do begin
   if ( N mod 10 ) < min then min := N mod 10;
   sum := sum + (N mod 10);
   N := N div 10
end;
WriteLn('summa = ', sum);
WriteLn('min = ', min);

Вернуться к обсуждению:
Определить номер минимальной цифры числа Turbo Pascal

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

39485 / 9562 / 3019

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

Сообщений: 41,671

Блог

28.10.2019, 14:56

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

Определите номер минимальной цифры в числе
дано натурально число n.определите номер минимальной цифры,считая от начала числа,все цифры...

Определить порядковый номер максимальной цифры, считая от конца и от начала числа
Привет! Люди прошу у Вас помощи, нужно сдавать работы 6 июня а у меня ни одной нет. Паскаль не...

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

Определить вагон с минимальной массой, его порядковый номер
Дан массив масс вагонов до 80 т А 1) определить вагон с минимальной массой , его порядковый номер...

	28.10.2019, 14:56

inter-admin

Эксперт

29715 / 6470 / 2152

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

Сообщений: 28,500

Блог

28.10.2019, 14:56

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

Определить номер первой по порядку цифры натурального числа N
Определить номер первой по порядку цифры натурального числа N, представленного в семеричной системе...

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

Определить порядковый номер минимальной цифры считая от конца числа
вот моя программа вроде бы все правильно , но выдает 0%, где ошибка? #include<stdio.h> main() {...

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

Новые блоги и статьи
Книги и учебные ресурсы по C# InfoMaster 08.01.2025 Базовые учебники и руководства Одной из лучших книг для начинающих является "C# 10 и . NET 6 для начинающих" Эндрю Троелсена и Филиппа Джепикса . Книга последовательно раскрывает основные концепции. . .	Что такое NullReferenceException и как исправить? InfoMaster 08.01.2025 NullReferenceException - одно из самых распространенных исключений, с которым сталкиваются разработчики на C#. Это исключение возникает при попытке обратиться к членам объекта (методам, свойствам или. . .	Что такое Null Pointer Exception (NPE) и как это исправить? InfoMaster 08.01.2025 Null Pointer Exception (NPE) - это одно из самых распространенных исключений в Java, которое возникает при попытке использовать ссылку на объект, значение которой равно null. Это исключение относится. . .	Русский язык в консоли C++ InfoMaster 08.01.2025 При разработке программ на C++ одной из частых проблем, с которой сталкиваются русскоязычные программисты, является корректное отображение кириллицы в консольных приложениях. Эта проблема особенно. . .	Telegram бот на C# InfoMaster 08.01.2025 Разработка ботов для Telegram стала неотъемлемой частью современной экосистемы мессенджеров. C# предоставляет мощный и удобный инструментарий для создания разнообразных ботов, от простых. . .	Использование GraphQL в Go (Golang) InfoMaster 08.01.2025 Go (Golang) является одним из наиболее популярных языков программирования, используемых для создания высокопроизводительных серверных приложений. Его архитектурные особенности и встроенные. . .
Что лучше использовать при создании класса в Java: сеттеры или конструктор? Alexander-7 08.01.2025 Вопрос подробнее: На вопрос: «Когда одновременно создаются конструктор и сеттеры в классе – это нормально?» куратор уточнил: «Ваш класс может вообще не иметь сеттеров, а только конструктор и геттеры. . .	Как работать с GraphQL на TypeScript InfoMaster 08.01.2025 Введение в GraphQL и TypeScript В современной разработке веб-приложений GraphQL стал мощным инструментом для создания гибких и эффективных API. В сочетании с TypeScript, эта технология. . .	Счётчик на базе сумматоров + регистров и генератора сигналов согласования. Hrethgir 07.01.2025 Создан с целью проверки скорости асинхронной логики: ранее описанного сумматора и предополагаемых fast регистров. Регистры созданы на базе ранее описанного, предполагаемого fast триггера. То-есть. . .	Как перейти с Options API на Composition API в Vue.js BasicMan 06.01.2025 Почему переход на Composition API актуален В мире современной веб-разработки фреймворк Vue. js продолжает эволюционировать, предлагая разработчикам все более совершенные инструменты для создания. . .	Архитектура современных процессоров inter-admin 06.01.2025 Процессор (центральный процессор, ЦП) является основным вычислительным устройством компьютера, которое выполняет обработку данных и управляет работой всех остальных компонентов системы. Архитектура. . .	История создания реляционной модели баз данных, правила Кодда Programming 06.01.2025 Предпосылки создания реляционной модели В конце 1960-х годов компьютерная индустрия столкнулась с серьезными проблемами в области управления данными. Существовавшие на тот момент модели данных -. . .

Наверх