Написать систему. От введённого с клавиатуры нечётного числа найти 18% ,чётное числ
Написать систему. От введённого с клавиатуры нечётного числа найти 18% ,чётное число увеличить на 19%
Гость
Ответ(ы) на вопрос:
Гость Program s;
var
a:integer;
begin
readln(a);
if a mod 2 = 0 then write(a*1.19) else write(a*0.18);
end.
Не нашли ответ?
Похожие вопросы