Информатика, опубликовано 15.04.2019 16:40
Поменяйте местами значения переменных x и y, не используя дополнительной переменной.
Ответ оставил: Гость
А листик тебе Почтой России выслать или через знакомых передать? В задачке можно вывести формулу, но мне лень, сделаем через цикл.
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём ИЗ "...ОтделыОбмен";
ПЕР
дрожжи, процент, расход, дней: ВЕЩ;
сч: ЦЕЛ;
УКАЗ
дрожжи := 120;
Вывод.Цепь("p: "); процент := Приём.Число();
Вывод.Цепь("Tx: "); расход := Приём.Число();
Вывод.Цепь("Tt: "); дней := Приём.Число();
ОТ сч := 1 ДО дней ВЫП
дрожжи := дрожжи + дрожжи * (процент / 100) - расход
КОН;
Вывод.ЧВещ("^%g", дрожжи, 0, 0, 0)
КОН Задание.
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...ОтделыОбмен", Приём ИЗ "...ОтделыОбмен";
ПЕР
дрожжи, процент, расход, дней: ВЕЩ;
сч: ЦЕЛ;
УКАЗ
дрожжи := 120;
Вывод.Цепь("p: "); процент := Приём.Число();
Вывод.Цепь("Tx: "); расход := Приём.Число();
Вывод.Цепь("Tt: "); дней := Приём.Число();
ОТ сч := 1 ДО дней ВЫП
дрожжи := дрожжи + дрожжи * (процент / 100) - расход
КОН;
Вывод.ЧВещ("^%g", дрожжи, 0, 0, 0)
КОН Задание.
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01
Информатика, опубликовано 09.01.2019 16:01