чему будет равен результат выполнения программы, если ввести значение для a=16
program c 22;
var a: integer;
begin
readln(a)
if (a mod 2=0) then
a:a div 2;
write (a)
end.

program c22;var a: integer;beginwriteln('a=');readln(a);if (a mod 2=0) thena:=a div 2;write (a);end.(исправила пару ошибок в проге )________________________________________a mod 2=0 - это условие показывает чётное ли число ..у нас а= 16 16 -это чётное число ..тогда а= 16  на цело поделить на 2а=8