Что будет выведено на экран после выполнения фрагмента программы: begin
x:=0;
if x<>5 then y:=10 else y:=0;
writeln (y);
end.​

10

Объяснение:

Идем по порядку.

На второй строке мы присваиваем х значение 0.

На следующей строке идет условие if. Знак <> значит "не равно". ТО есть если х не равно 5, то в у записываем 10, иначе 0. х не равно 5, значит в у будет 10. Ну, и затем мы выводим значение у.