Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
solnha
27.04.2021 04:25 •
Информатика
Написать полную программу в паскаль n школьников делят k яблок поровну, неделящийся остаток остается в корзинке. сколько яблок достанется каждому школьнику? программа получает на вход числа nи k и должна вывести искомое количество яблок.
Показать ответ
Ответ:
IUcenhik
23.06.2020 10:09
var
n,k:integer;
begin
writeln('Введите кол-во школьников: ');
read(n);
writeln('Сколько яблок у них? ');
read(k);
writeln('Каждый школьник получит ',k div n,' яблок(у)');
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
Daniil6class
19.03.2021 23:44
Последовательность создания нового рисунка в тукспаинт...
Вова1337228
19.03.2021 23:44
Какой из перечисленных ниже графических редакторов является векторным? 1) photopaint 2) adobe photoshop 3) paint 4) corel draw...
мили241
07.11.2022 12:02
Запиши доменное имя компьютера, зарегистрированного в домене первого уровня lv, домене второго уровня schools и имеющего собственное имя www....
бык22
02.05.2021 07:20
1назовите комп,который используется для обработки и хранения больших баз данных. 1.большой комп 2.персональный комсп 3.суперкомп 4.сервер 2ноутбук относится к виду 1.суперкомп...
Flora999
23.11.2020 22:51
Солнышки с программированием;)...
Алентина
23.11.2020 22:51
Найти 1/4 числа от числа 43480....
woonov1488
23.11.2020 22:51
СОЧИНЕНИЕ НА ТЕМУ был ли иной путь у Екатерины В пьесе Гроза Островский. СЛОВ...
qawsed123
23.11.2020 22:51
Высший оксид элемента имеет относительную формульную массу 56. Валентность неизвестного элемента не более II. Найдите этот элемент, составьте формулу оксида, укажите его...
nunim
20.02.2020 17:53
Переведите стих Толегена Айбергенова О, адамдар, біргемін мен сендермен, Ықыласыңа еш нәрсені теңгермен. Сендер — менің бақытымның бұлағы, Сендер менің дарыныма жел берген....
SelesTia3
28.03.2021 15:16
Дано mcm=250гmcb=100гt=27°Ctna=327°CCim=500 Дж/кг°CCcb=140 Дж/кг°CAcb=25•10³ Дж/кгQ -?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
n,k:integer;
begin
writeln('Введите кол-во школьников: ');
read(n);
writeln('Сколько яблок у них? ');
read(k);
writeln('Каждый школьник получит ',k div n,' яблок(у)');
end.