Как реализовать программу в паскаль которая из одного 4-хзначного делает два 2-хзначных?

Question

[Slava04]

Кто может подсказать как реальзивать программу которая из одного 4-хзначного числа делает два 2-хзначных. Например 5678 => 58 76

Answer 1

[Hemul GM]

Ты охренел? Второй раз подряд этот вопрос задаешь. Тебе дали исчерпывающую инфу. В случае, когда ты просишь код - твой вопрос нарушает правила ресурса.

Answer 2

[Василий Банников]

div 100
mod 100

Comments

[Slava04]

А не подскажите как полностью будет выглядеть код. Я просто никогда не работал с паскалем

[Василий Банников]

Slava04, с каким-то другим языком работали?

[Slava04]

Василий Банников, К сожалению нет

[Василий Банников]

(Сам давно очень работал, по тому погут быть ошибки)
По хорошему ещё есть смысл добавить проверку, что src находится в диапазоне от 1000 до 9999

var
src, a, b: Integer
begin
src := readln();
a := src div 100;
b := src mod 100;
writeln(a);
writeln(b);
end.

[Василий Банников]

Slava04, тогда так и пишите)

[Василий Банников]

Slava04, div - это деление с остатком. mod - это получение остатка от деления

[Александр]

Ваша программа вернет
5678 => 56 78
а ему надо:
5678 => 58 76

тут проще как строку его обработать...

[Василий Банников]

Александр, я прост хз как в паскале со строками работать, так что не подскажу

[Hemul GM]

Александр, скорее всего он просто накосячил с описанием