Question

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

Answer 1

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