Что такое любая часть окружающей действительности воспринимаемая человеком как единое целое

Question

Информатика: Что такое любая часть окружающей действительности воспринимаемая человеком как единое целое

kksa2001 · Accepted Answer

PascalABC.NET 3.3.5, сборка 1660 от 20.04.2018
Внимание! Если программа не работает, обновите версию!

begin
var n:=ReadInteger('n=');
var d:array[1..4] of integer;
for var i:=1 to 4 do begin
    d[5-i]:=n mod 10;
    n:=n div 10
    end;
if d[1]+d[2]=d[3]+d[4] then
    Writeln('Сумма двух первых цифр равна сумме двух последних');
if (d[1]+d[2]+d[3]+d[4]) mod 3 = 0 then
    Writeln('сумма цифр кратна трем');
if (d[1]*d[2]*d[3]*d[4]) mod 4 = 0 then
    Writeln('произведение цифр кратно четырем');
end.

MOGZ ответил