Скорее всего в оперативной памяти. Процессор после обратотки информации отправляет её именно туда а позже, когда она уже проработала её можно сохранить в ПЗУ.
Допустим анна сказала правду про сына ирины(получаем сын ирины кирилл)
ирина:кирилл сын анны неверно то есть сын ирины максим
ольга:сын анны максим неверно потому что максим сын ирины
Получаем Анна Денис
Ирина максим ольга кирилл
<h3>PascalABC.NET 3.4.2, сборка 1857 от 05.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
var Число := ReadInteger('Введите натуральное число:');
var (Четных, Нечетных) := (0, 0);
while Число > 0 do
begin
if (Число mod 10).IsOdd then Inc(Нечетных)
else Inc(Четных);
Число := Число div 10
end;
Println('Нечетных', Нечетных, 'четных', Четных)
end.
<h2>Введите натуральное число: 1406439</h2><h2>Нечетных 3 четных 4 </h2>
var a,b,n,i:integer;
begin
write('Введите a,b,n: ');
readln(a,b,n);
repeat
write(a,' ');
a:=a+n
until a>b
end.
или
var a,b,n,i:integer;
begin
write('Введите a,b,n: ');
readln(a,b,n);
while a<=b do
begin
write(a,' ');
a:=a+n
end
end.