Пр информатике. изучили операторы for, if ,while , repeat . составьте программу , . если на одну чашу весов посадить мальчика , который весит n - кг , а на др. чашу весов насыпать n-кг конфет , к мальчику посадить девочку , которая весит на 5 кг меньше , а конфеты гораздо тяжелее детей , сколько необходимо съесть конфет детям , чтобы чаши весов уравновесились ?
sanyaraku
3
21.05.2019 10:00
2
Другие вопросы по теме Информатика
мага399
05.11.2020 20:40
милан64488
08.06.2019 19:41
strongdodu
19.04.2021 10:12
23LOLKEK
25.10.2019 00:09
MaveJ
22.12.2020 17:31
julliastripa
22.12.2020 17:30
Be11a
22.12.2020 17:30
prus3109Серж
22.12.2020 17:30
moxic37280
11.06.2019 13:17
Популярные вопросы
- Які інженерні та архітектурні відкриття втілено в Пантеоні ?...
3 - Қажетті сөйлемдерде толықтырылды. Күн жүйесінің нысандарына...
1 - До ть з укр. мовою будь ласка...
1 - 2. Назови части электрической цепи. Какие функции они выполняют?...
1 - Во и задания для самоконтроля1. Как началась Вторая мировая война?...
3 - Речення з пунктуаційною помилкою...
3 - Сократите дробь х-у/x^2-y^2...
2 - Прочитай описания героев расскaзa И.С. Тургенева «Бежин луг». Напиши...
2 - Лекарственные растения семейства сложноцветные (привести 3-4 примера...
1 - KCl+ H20= Na2SO4+CuCO3= H2S+ Cu(NO3)2= Cu(OH)2= C+O2= H2O+CO2= CaSiO3+H2S...
2
var
n,m,i:integer;
begin
write('Введие вес мальчика: ');
readln(n);
write('Введите массу конфет (кг): ');
readln(m);
i:=0;
while n+n-5<>m do
begin
i:=i+1;
m:=m-1;
end;
writeln('Детям необходимо сьесть ',i,' кг конфет');
end.