2)var a:integer;
begin
write (a);
read (a);
if (a>=-5) and (a<=10) then write ("true") else write ("false);
end.
Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.