Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
tanechkamaksim1
29.03.2020 19:33 •
Информатика
Паскаль. даны положительные числа a и b (a > b). на отрезке длины a размещено максимально возможное количество отрезков длины b (без наложений). не используя операции умножения и деления, найти длину незанятой части отрезка a.
Показать ответ
Ответ:
GreatGenius
25.08.2020 17:25
//Pascal ABC.NET 3.1 сборка 1219
Var
a,b:integer;
begin
read(a,b);
while a-b>=0 do
a:=a-b;
writeln(a);
end.
Пример ввода:
16
5
Пример вывода:
1
0,0
(0 оценок)
Популярные вопросы: Информатика
Nastya32q
21.04.2020 23:18
Выполни исследовательский проект по предложенным темам. Темы проектовВопросы и направления исследованийбоевыеРазвитиеразработки боевых(военных) роботовВ настоящее времяКогдапоявились...
granevamariaf
13.08.2022 18:59
Как ты думаешь, почему важно изучать программирование и не слишком большой ответ...
vvasilchenkosn
21.07.2020 14:38
Программа специального назначения которая позволяет просматривать HTML документы...
Себастиаан
26.01.2020 20:32
1. Для решения каких задач предназначены функции категории Ссылки и массивы? ...
fluffnastya
21.02.2020 16:06
Изучи программный код и определи его назначение. робот опускает и поднимает рычаг (средний сервомотор) робот поднимает и опускает рычаг (средний сервомотор) робот поворачивает направо...
жанат17
12.10.2020 20:34
Уровень - Знание и понимание 1. Что такое «язык программирования»??2. Почему языки программирования делятся на машиниозависимые и ма-шиннонезависимые?3. Как вы понимаете термин «трансляторы...
2018kat
18.07.2020 04:11
Назначение постоянной памяти ROM BIOS: a) выполнение вычислений, обработка числовой информации b) хранение программ и данных во время их работы c) управление логикой материнской...
zlatochkagr
03.09.2022 19:29
Как бы ты объяснил своим одноклассникам то, что узнал об ин- тегрированной среде программирования (IDE)?...
помагите71
18.03.2023 01:40
Сколько чисел, не превосходящих 123 имеют первую цифру 3, если записаны по основанию 6?...
АнастасияГабель
26.03.2020 04:16
Сколько чисел, не превосходящих 123 имеют первую цифру 3, если записаны по основанию 6?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var
a,b:integer;
begin
read(a,b);
while a-b>=0 do
a:=a-b;
writeln(a);
end.
Пример ввода:
16
5
Пример вывода:
1