Впятизначном числе вычеркнуть цифры через одну, начиная вычеркивать первую слева. (дано: 73942. результат: 34) паскаль

bykvav bykvav    2   27.08.2019 02:30    0

Ответы
11DarkMoon11 11DarkMoon11  05.10.2020 21:59
Var
A:integer;
Begin
WriteLn('Введите пятизначное число');
ReadLn(A);
WriteLn((A div 1000) mod 10,(A div 10) mod 10)
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика