Pascal.abc
Пользователь вводит целое число. Если оно ЧЕТНОЕ, ЕСЛИ больше 10 И меньше 20, то вывести ИЗНАЧАЛЬНОЕ число, умноженное на 2.

Ответ

Автор - lingvini2013

var a: integer;

begin

read(a);

if (a mod 2 = 0) and (a > 10) and (a < 20) then writeln(a * 2);

end.

Сервис носит ознакомительный характер, вся информация, а в частности вопросы и ответы, которые задают и отвечают пользователи.