Ответ:
1110011010
Объяснение:
Решается деление на 2. Остаток и является ответом.
<span>program A;vark, t: integer;beginassign(input, 'input.txt'); reset(input);assign(output, 'output.txt'); rewrite(output);ReadLn(k, t);if (t div k mod 2 = 0) thenWriteLn(t mod k)elseWriteLn(k - t mod k);close(input); close(output);<span>end.</span></span>
Периметр вычисляется как а * б строны
В эксель
формула " =2*(A1+B1) "
Вводишь в ячеки А1 и B1 соответсвующие значения а в С1 вставляешь эту формулу: =2*(A1+B1) и все
Var
f: Text;
n, s, e: integer;
begin
n := 0;
s := 0;
Assign(f, 'input.txt');
Reset(f);
while not Eof(f) do
begin
readln(f,e);
n := n + 1;
s := s + e
end;
Close(f);
writeln('В файле ', n, ' чисел; их сумма равна ', s)
end.
Тестовое решение:
В файле 10 чисел; их сумма равна 213
Содержимое файла input.txt:
24
37
14
-6
42
58
3
14
0
27