Хранить записанные данные и предоставлять их для чтения.
всего 86.
8 не любят, значит любят 78.
54 - квесты, 78-54=24.
62 - симуляторы, 78-62=16.
78-(24+16)=38 с одинаковым удовольствием играют и в квесты, и в симуляторы
Var n:integer;
begin
write('n = ');
readln(n);
writeln('цифры числа:');
writeln(n div 10);
writeln(n mod 10);
end.
Пример:
n = 38
цифры числа:
3
8
3 ГБ = 3x1024 МБ=3072 МБ
3072+800=3872 МБ