Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
плюскваммиперфекти
06.06.2021 09:18 •
Информатика
Составить программу паскаль чтобы сделать бусы, ювелир взял нить длиной d и жемчужины радиуса r. определить, сколько жемчужин он сможет нанизать на эту нить.
Показать ответ
Ответ:
Cerd
15.07.2020 14:21
Program abc;
Var d, R, n: real;
Begin
Writeln('Введите длину нити: ');
Read(d);
Writeln('Введите радиус жемчужин: ');
Read(R);
n:= d/R;
n:= int(n);
Writeln('Поместится: ', n, ' жемчужин');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
nikitazaharov28
10.11.2021 03:41
(Python)Дан массив из 3 элементов: radius = [12, 35, 4] Программа должна вычислить площадь круга для каждого из чисел и сохранить все площади в отдельный массив areas. Все математические...
misarevakin6
16.12.2022 03:48
C++ Дано число n .Создайте массив a[2n+1][2n+1] и заполните его по спирали , начиная с числа 0 в центральной клетке a[n+1][n+1].Спираль выходит вверх по часовой стрелке 212 11 10...
iyutina2017
02.01.2023 10:45
Соедини стрелками, кто что умеет делать . восприниать информацию, хранить, передавать, обрабатывать! мальчик, компьютер, робот, книга...
adil78245
02.01.2023 10:45
Сканер ввод или вывод и его значение. микрофон ввод или вывод и его значение веб-камера ввод или вывод и ее значение...
артлжьт
02.01.2023 10:45
Как называется преобразование двоичного кода в форму ,понятную для человека а)декодирование, б)кодирование, в)моделирование, г) шифрование...
YanaNiki
03.01.2021 08:50
Вывести на экран таблицу умножения в паскале через while...
1Z1D
03.01.2021 08:50
Укажите лишнее в операциях над объектами windows а. копирование б.перемещение с. удаление д. хранение ....
Котик505мяу
03.01.2021 08:50
Полный путь к файлу c: \книги\рассказ.txt. каково имя файла? выбрать правильный ответ 1.книги\рассказ 2.книги\ рассказ.txt. 3.txt. 4. рассказ.txt....
том55551
25.10.2020 14:25
Узнайки кот прогулялся по клавиатуре и напечатал текстовую строку киттикрот знайка установил курсор в его конце и проделал следующие действия какая текстовая строка получилась в...
nikita6011
22.04.2020 12:06
Создайте программу как в qbasic : задано число m и число n сообщить является ли n делителем числа m (программа со всякими if then и прочей)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Var d, R, n: real;
Begin
Writeln('Введите длину нити: ');
Read(d);
Writeln('Введите радиус жемчужин: ');
Read(R);
n:= d/R;
n:= int(n);
Writeln('Поместится: ', n, ' жемчужин');
end.