По формуле а,(b)=a*(b/9)
75,(8)=75*(8/9)
39,(16)=39*(16/99)(а это а,(бс)=а*(бс/99)
Находим сумму:683/9+3877/99=11390/99=115(05)
Проверила несколько раз
Var a:integer;
begin
readln(a);
while(a<>0) do begin
write(a mod 10);
a:=a div 10;
end;
<span>end.</span>
Ответ:
с лева клацаеш на файл там открыть и создать слева в вкладке вставка печатать
Объяснение:
<span>A = (5 < 10) = true
B = (2 = 2) = true
С = (4 < 2) = false
</span><span>(A and B) or C ↔ (A or C) and (A or not B) </span>⇒
(true and true) or false ↔ (true or false) and (true or not true) ⇒
true or false ↔ true and true ⇒
true ↔ true ⇒
true
<em>// PascalABC.NET 3.2, сборка 1407 от 18.03.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a,b:integer;
Write('Введите границы интервала: '); Read(a,b);
if a>b then Swap(a,b); // страховка от злобных буратинок
var k:=Range(a,b).Where(m->sqr(sin(m))+cos(m*m)<0).Count;
Writeln('На интервале найдено отрицательных значений- ',k)
end.
<u>Пример</u>
Введите границы интервала: -3 10
На интервале найдено отрицательных значений- 4