PascalABC.NET 3.2 (сборка 1482 от 13.06.17)
Begin
Write('Количество отрицательных чисел: ',ReadSeqReal('Введите три числа:',3).Where(x->x<0).Count)
End.
1. А с чертой или не А
2. А с чертой или не А
3. А с чертой или не А (это все одно и то же)
4. Монитор
5. Процессор
Программа для решения задачи:
var x,f:real;
begin
write('x=');readln(x);
if x<=-3 then f:=9 else f:=1/(x*x+1);
writeln('f(x)=',f:5:3);
<span>end.
Пример:
x=-4
f(x)=9.000
Блок-схема - в прилагаемом файле.</span>
Да.
13€R, потому оно является выражениям высказывания.
Оте жэй:
граммдар килограммда конвертту керек: биз граммдар 1000ге болемиз. сондыктан осы массасы 300ге " * " деген операциясы истеймиз