Program calculator;
Var a,b: real;
Begin
Write('Первое число:');
readln (a);
Write('Второе число:');
readln (b);
Write('Результат: ',a+b);
End.
Begin
var arr := arrGen(ReadInteger('Введите n: '), e -> ReadInteger()).Println().ToArray();
var sum := arr.Skip(arr.Length - 5).Sum();
Println(sum);
arr[0] := arr[0] < 0 ? arr[0] : sum;
arr.Println();
end.
Var
best, m, s,i: integer;
begin
best := 10000000;
for i:= 1 to 3 do begin
write('min sec = ');
readln(m, s);
if best > m * 60 + s then best := m * 60 + s;
end;
writeln('Лучший = ', best div 60, ' min ', best mod 60, ' sec');
end.
В теории HDMI если чего нового не изобрели
Я не сильна в информатике,но посчитала так: 64*32=2048 символов в данной статье;2048*2=4096 байт в кодировке;и 1 Мб=1024 Кб,по-этому 4096:1024=4 Кб
Ответ:4 Кб.