Var a, b, c, d, f: real; begin a: =40; b: =25; readln(c); a: =a-a*25/100; d: =c/a; writeln('количество тетрадей'); writeln (int (d)); end. readln(c) = 1000 первоначальная цена 40 руб, затем скидка = 25%, новая цена 30 рублей. ответ: на 1000 рублей можно купить 33 тетради (по 30 руб). вопрос: нужно сделать так, чтобы программа выдала сдачу!

LinaLafe LinaLafe    2   06.09.2019 07:40    0

Ответы
samininav1 samininav1  06.10.2020 20:52
Во первых в проге можно облегчить; вместо int(d) и d:=C/A
можно: d:=C div A и потом просто вывести д
ну а про сдачу то формулу f:=c mod a и потом вывести ф
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика