√(x-0,3)^2 =|x-0,3|
Поэтому можно так:
Var
x:real;
Begin
Write('x = ');
Read(x);
Write('y = ',sqrt(sqr(x-0.3)))
End.
а можно так:
Var
x:real;
Begin
Write('x = ');
Read(x);
Write('y = ',abs(x-0.3))
End.
Вот такое соответствие здесь:
1-А
2-Г
3-В
4-Б
5-Д
21 час делим на 3,получаем количество делений за 21 час.
Затем количество делений умножаем на 2
21/3*2=14 амеб
Ну в общем то, просто выведет остаток от деления k/7, так как mod - отбрасывает целую часть числа.
Сколько учеников имеют суммарный балл ниже среднего (excel) смотри на файле