program dvuznach_iz_nech;
var
x:integer;
begin
write('введите двузначное число》');
read(x);
if(x div 100<=0)and(x div 10 >0)and(x mod 10 mod 2=1)and(x div 10 mod 2=1)
then
write('введенное двузначное число состоит из нечётных цифр')
else
write('введенное двузначное число не состоит из нечётных цифр или вы ввели недвузначное число')
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
program dvuznach_iz_nech;
var
x:integer;
begin
write('введите двузначное число》');
read(x);
if(x div 100<=0)and(x div 10 >0)and(x mod 10 mod 2=1)and(x div 10 mod 2=1)
then
write('введенное двузначное число состоит из нечётных цифр')
else
write('введенное двузначное число не состоит из нечётных цифр или вы ввели недвузначное число')
end.