Дано число. Если оно больше 10, то вывести на консоль, если оно меньше 3, увеличить его на 11 и вывести на консоль, в остальных случаях уменьшить на 100. PascalABC

Question

Никитий

24 сентября, 03:53

+4

Ответы (1)

Знаете ответ?

Клеопатра · Answer 1

Program n1;

var a: real;

begin

readln (a) ;

if a>10 then write (a)

else if a<3 then write (a+11)

else writeln (a-100) ;

end.