Написать систему. от введённого с клавиатуры нечётного числа найти 18% ,чётное число увеличить на 19%

Nakonechna21 Nakonechna21    3   07.08.2019 13:20    0

Ответы
Disna2006 Disna2006  20.08.2020 01:15
Program s;
var
a:integer;
begin
readln(a);
if a mod 2 = 0 then write(a*1.19) else write(a*0.18);
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика