Дано 4-хзначное число. используя логические величины, ответить на вопросы: является ли число четным; является ли вторая цифра числа четной. программа: pascalabc,net

130

500

Посмотреть ответы 2

Ответы на вопрос:

Van4more

Информатика

4,8(46 оценок)

Var a: integer; begin writeln('введите число'); readln(a); if a mod 2 =0 then writeln ('число чётное') else writeln ('число нечётное'); if ((a div 100) mod 2=0) then writeln ('2-я цифра чётная') else writeln ('2-я цифра нечётная'); end.