19. См. первое вложение.
Полученное выражение можно упростить.
20. См. второе вложение.
Упростим полученное выражение.
F
<u>никогда</u> не будет принимать значение 1
52 / 2 = 26 детей любит конфеты. остальные 26 гарантировано любят мороженое. + 20 из тех, кто любит конфеты, так же любит мороженое.
мороженое любят 26 + 20 = 46 детей
только мороженое любят 26 детей.
Var
i, sum : integer;
begin
sum := 0;
for i := 1 to 100 do sum := sum + i;
writeln (sum);
end.
Мне кажется, что должно быть так:
Возможно 70, но по идее такая программа работать не будет, потому что вызвать внутри функции можно только вышестоящую функцию. Т. е. вызвать из функции F функцию G нельзя. (если это паскаль, конечно)