Program n1;
var a,b,c,x: integer;
begin
readln(x);
a := x div 100;
b := x div 10 mod 10;
c := x mod 10;
if ((a+b+c) mod 2=0) then writeln('true')
else writeln('false');
end.
Пример в Excel 2003
Ярлычки листов соответствуют № задания
K:=0;
for i:=1 to n do
for j:=1 to m do
if a[i,j]<>0 then k:=k+1;
Формула : A-->B = отрицаниеA + B ( + 'это логическое сложение ∨)
X^2≤ 121 + X> X+5 = 1 - истина
X=11 : 11≤121 + (11> 16) =1 - верно!
X=12: 12≤121 + (12> 16) = 1 - неверно!
Ответ: X=11
Условия состоящие в ещё одно условие называются вложенными.
Например цикл for в for:
1)for i:=1 to 10 do
2)for a:=1 to 10 do
writeln(i+a);
2 цикл for является вложенным,так же его можно назвать внутренним,а 1 цикл for внешним.