Дана программа program primer3 usus crt; var x: integer ; begin clrscr; readlin (x); if x mod 2=0 then writeln (да ) else writeln ( нет) при каком значении х будет получен ответ да
При четном значении x