1 задание 1000кб 1500/75=20*50=1000
но я не математик :)
If (x>=6) and (x<=8) then begin
z:= x div 2 ;
ответ 8 div 2 = 4 z:=4
<em>// PascalABC.NET 3.2, сборка 1488 от 21.06.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
ReadSeqReal('10 чисел через пробел:',10).Reverse.Println
end.
<u>Пример</u>
10 чисел через пробел: 3.6 -2.17 5 12.7 0 1e-12 82 3.18e6 -263 3.14
3.14 -263 3180000 82 1E-12 0 12.7 5 -2.17 3.6
3 = 3 следует нет, ну а дальше 3+3=6 и 6-1=5 ответ: 5