Pascal.abc пользователь вводит целое число. если оно четное, если больше 10 и меньше 20, то вывести изначальное число, умноженное

Question

Информатика: Pascal.abc пользователь вводит целое число. если оно четное, если больше 10 и меньше 20, то вывести изначальное число, умноженное на 2.

лох2008 · Answer

var a: integer;beginread(a);if (a mod 2 = 0) and (a 10) and (a 20) then writeln(a * 2);end....

Pascal.abc пользователь вводит целое число. если оно четное, если больше 10 и меньше 20, то вывести изначальное число, умноженное на 2.