107-9 = 98 человек знают как минимум один из языков.
86 + 80 - 98 = 68 человек знают оба языка
86-(98-80)=80-(98-86)=68
<span>program axaxa;
var n,a,s:integer;
begin
readln(n);
s:=0;
while n>0 do
begin
a:=n mod 10;
s:=s+a;
n:= n div 10;
end;
writeln(s);
</span>end.
var a,b,c,max : real;
begin
read(a,b,c);
max:=(a+b+abs(a-b))/2;
max:=(max+c+abs(max-c))/2;
writeln(max);
end.
1) именительного падежа,единственного числа.
2)<span>следовательно, число не оканчивается на 0</span>
ОТДЕЛ Задание+;
ИСПОЛЬЗУЕТ Вывод ИЗ "...\Отделы\Обмен\", Приём ИЗ "...\Отделы\Обмен\";
ПЕР
число: ЦЕЛ;
УКАЗ
число := Приём.Число();
ЕСЛИ число = 0 ТО Вывод.Цепь("^Ноль.") ИНАЧЕ
ЕСЛИ число < 0 ТО Вывод.Цепь("^Отрицательное ")
ИНАЧЕ Вывод.Цепь("^Положительное ") КОН;
ЕСЛИ ЧЕТ(число) ТО Вывод.Цепь("чётное число.")
ИНАЧЕ Вывод.Цепь("нечётное число.") КОН
КОН
КОН Задание.