Опубликовано 12.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

Выведет значение 8............................)
Он проверяет, если а делится на 2, то тогда он его делит и выводит :)