Ответ:
7
Объяснение:
а = 10
b = 4
b = a % b + 3 = 10 % 4 + 3 = 2 + 3 = 5
(% получение остатка от деления 10 / 4 = 2 целых и 2 в остатке)
а = 10
b = 5
с = (а + 1) % (b + 1) + a // b = (10 + 1) % (5 + 1) + 10 // 5 = 11 % 6 + 10 // 5 = 5 + 2 = 7
(% получение остатка от деления 11 / 6 = 1 целых и 5 в остатке)
(// целочисленное деление 10 / 5 = 2 целых и 0 в остатке)
% - берём остаток
// - берём целое
<u>Вот текст:</u> Попытка не пытка<u>.</u>
Var a,b: integer;var M: array[1..10] of integer;begina:=1;while a<>1000 do beginreadln(a);b:=b+1;if a mod 10 = 5 then M[b]:=a;end;writeln(M[1]+M[2]+M[3]+M[4]+M[5]+M[6]+M[7]+M[8]+M[9]+M[10]);<span>end.</span>
<span>RECTANGLE 1,1,200,200,Red,Green - 31 символ
Ответ: 31 байт</span>
Всё гениальное - простое!