Задача на языке Pascal: дано число - 2852 вытащить из середины число 85 и 58 число 2852 дано целиком то есть, const a = 2852;

Задача на языке Pascal: дано число - 2852 вытащить из середины число 85 и 58 число 2852 дано целиком то есть, const a = 2852;
Гость
Ответ(ы) на вопрос:
Гость
a1:=a div 100 a2:=a div 10 writeln('85: 'a1,a2,' 58: 'a2,a1)
Не нашли ответ?
Ответить на вопрос
Похожие вопросы