8) 1 (т.к в скобках везде идет сложение)
9) 1 (т.к в конце, не в зависимости от результата плюсуем единицу)
10) Сначала делаем конъюкцию , потом дезъюнкицю, следовательно A*0 = 0, 1+0 = 1, ответ 1
Можно более корректно описать ситуацию?
<span>1)
var n,i:integer;
begin
readln(n);
for i:=1 to n do
if n mod i = 0 then write(i,' ');
readln;
end<span>.</span></span>
По какому предмету если по математике то можно лич,дроби,параллелепипед и т. д.
Program spinogryz21;
var
x, i: integer;
yes: boolean;
begin
yes := FALSE;
write('Введите число Х ');
readln(x);
for i := 1 to 4 do
begin
if (x mod 10) = 6 then yes := TRUE;
x:=x div 10;
end;
if yes then writeln('6 входит в число Х')
else writeln('6 не входит в число Х');
end.