Program z; var n,a,b,c:word; begin writeln('Введите число'); readln(n); a:=n mod 10; n:= n div 10; b:= n mod 10; n:= n div 10; c:=n; if b mod 2 = 0 then b:=0; writeln(c,b,a); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку