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

Question

Феодотия

Сегодня, 14:31

+1

Ответы (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.