Var s:real;
begin
readln;
s:=((1+2)/(3+4))/((5+6)/(7+8));
writeln(s);
readln;
end.
Если числа от 1-10 то нужно
(1+2+3+4+5+6+7+8+9+10):10=
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
ReadSeqInteger(ReadlnInteger)
.Where(t->(t mod 6=0) and (t mod 10=4)).Count.Println
end.
Работой всех составляющих компьютера занимается процессор, который обрабатывает всю получаемую от пользователя информацию, НО так же работоспособность всех комплектующих ещё на ранней стадии запуска контролирует чип с BIOS. Его задача - проверить систему на наличие ошибок и сбоев. Если что-то будет не так, то компьютер попросту не сможет включиться.