С клавиатуры вводится число, если число принадлежит промежутку от 10 до 30, то его умножают на три, иначе умножают на -1, результат вывести на экран

1

Ответы и объяснения

2013-10-21T20:50:58+04:00
Program z;
var a: integer;
begin
readln(a);
if (a < 30) and (a > 10) then
writeln(a*3)
else writeln(-a);
end.