5981 bit = 5981/8 = 747,63 bytes
867245 / 747.63 = 1159,99 bytes
ответ
1159 байт
"komp"
"komp"
"komp"
"komp"
"komp"
"komp"
"komp"
"komp"
"komp"
"komp"
Ar
a, b, c, d, n : integer;
begin
write('введите первое число ');
readln(a);
write('введите второе число ');
readln(b);
write('введите третье число ');
readln(c);
write('введите четвёртое число ');
readln(d);
n:=a;
if b>n then n:=b;
if c>n then n:=c;
if d>n then n:=d;
writeln('Большее из чисел равно ', n);
end.
Анализ действий программы (евклидов метод) , базы сигнатур