Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
20H
19.03.2021 15:38 •
Информатика
Pascal abs: сколько понадобится парт, чтобы рассадить n школьников, если за одну парту можно посадить одного или двух человек? за каждой партов должен сидеть хотя бы один человек
Показать ответ
Ответ:
aurantiuma
30.09.2020 00:57
Var n,k:integer;
begin
write('N = ');
readln(n);
k:=(n+1) div 2;
writeln('Количество парт может быть от ',k,' (min) до ', n,' (max)');
end.
Пример:
N = 9
Количество парт может быть от 5 (min) до 9 (max)
0,0
(0 оценок)
Ответ:
vovkatop228
30.09.2020 00:57
Program prog;
uses crt;
var n :integer;
begin
clrscr;
write('Количество учеников N = ');
readln(n);
writeln('Необходимое количество парт: ', (N/2):0:0, '-', N);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
dmitrocreativ
23.11.2020 19:59
Что будет выведено на экран после выполнения этой программы? string s = 123456789 ; int n = s.find ( 456 ); s.erase ( n+2, 3 ); cout s;...
ПРИВЕТ174rus
17.06.2020 02:53
Программист получил задание написать программу, которая будет выводить на экран количество таких разрядов числа, в которых стоят четные цифры. Программист торопился и допустил ошибки...
shumskaya03
02.04.2021 09:01
Обозначим за n%m операцию, возвращающую остаток от целочисленного деления n на m. известно, что сумма всех целых положительных чисел a, для которых следующее логическое высказывание...
alinasad337
10.09.2022 12:09
На рисунке 166 приведён кроссворд любишь число записанное по горизонтали и вертикали Дайте определение сделайте вывод информатика...
Vika53483
03.12.2022 16:22
14. Выполните перевод из одной единицы измерения информации в другую: 12 Кбайт=….. байт 15. В кодировке Unicode на каждый символ отводится два байта. Определите информационный объем...
sofi200703
26.07.2022 21:41
Вкодировке кои-8 каждый символ кодируется 8 битами.определите количество символов в сообщении,если информационный объем сообщения в этой кодировке равен 160 бит...
MashaVonlaar
26.07.2022 21:41
Запишите по одному истинному высказыванию из биологии, , информатики, , , ....
RafSW
23.12.2021 14:16
(√3+√5)²-√60 как называется эта тема по примеру...
натали574
23.12.2021 14:16
Назовите любые три характерных признака государства...
valera20035
23.12.2021 14:16
С1) вычислите массовые доли кислорода в следующих оксидах: al2o3, co2 2) рассчитайте массу оксида калия, необходимого для получения 37г гидроксида калия...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
write('N = ');
readln(n);
k:=(n+1) div 2;
writeln('Количество парт может быть от ',k,' (min) до ', n,' (max)');
end.
Пример:
N = 9
Количество парт может быть от 5 (min) до 9 (max)
uses crt;
var n :integer;
begin
clrscr;
write('Количество учеников N = ');
readln(n);
writeln('Необходимое количество парт: ', (N/2):0:0, '-', N);
end.