Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
var n : integer; beginreadln (n); case n of1, 2, 12 : writeln ('зима'); 3, 4, 5 : writeln ('весна'); 6, 7, 8 : writeln ('лето'); 9, 10, 11 : writeln ('осень'); end; end.
ответ: 6 бит
program xxx;
var i, s : integer;
begin
s: =0;
for i: = 10 to 99 do
if i mod 5 = 0 then s: =s+i;
writeln('сумма двузначных чисел, кратных 5 =', s);
readln
end.
по формуле включений-исключений
35 = 24 + 18 + 12 - 5 - 10 - 8 + х
х = 4
чтобы понять формулу, надо нарисовать 3 круга которые имеют общую область пересечения
Популярные вопросы