Я давал ответ на прошлый вопрос начало тоже начну с вода формуллы
<span>b=(fabs(x)-</span>fabs(y))/(1+fabs(x*y));
fabs(x)-модуль числа x
К примеру число aнужно округлить тогда a mod 10; создаем ячейку для округленного числа k:=a mod 10 и b:=a-k; Всё
Ответ: 2.
div - целое число от деления.
mod - остаток от деления.
1) 1000 div 5 = 1000/5 = 200.
2) 200 mod 3 = 200/3 = 2.
<em>// PascalABC.NET 3.3, сборка 1590 от 03.12.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(8,-9,9); a.Println;
Writeln('Сумма положительных ',a.Where(t->t>0).Sum);
Writeln('Количество нулей ',a.Where(t->t=0).Count)
end.
<u>Пример</u>
2 6 -6 7 0 2 3 6
Сумма положительных 26
Количество нулей 1