Пользователь вводит целое число. если оно является четным и при этом не находиться между 10 и 20, то вывести на экран его квадрат. в противном случае напечатать исходное число
Пользователь вводит целое число. если оно является четным и при этом не находиться между 10 и 20, то вывести на экран его квадрат. в противном случае напечатать исходное число
Гость
Ответ(ы) на вопрос:
ГостьГотово........................
Гостьvar
n:Integer;
Begin
Read(n);
if (n mod 2=0) and (n<10) or (n>20) then Writeln(n*n);
end.
Не нашли ответ?
Похожие вопросы