Var x: real;
{ процедура функция }
function y( x: real): real;
begin
if x>0 then Result:=5*x*x-(4/7)*x+2;
if x<0 then Result:=5*x*x-2*x+(1/3)*x-2;
end;
{ основная программа }
begin
write('Задайте значение x ');
readln(x);
if x=0 then writeln('при х = 0 функция не определена')
else writeln('Значение функции y = ',y(x):12:5);
end.
<span>
</span>
Ответ:
Var a, i:integer;
Begin
Writeln('Введите число') ;
Read(a) ;
For i:=1 to 9 do writeln( a, '*', i, '=', a*i) ;
End.
<span>Недостатки и преимущества электронной коммерции 2011-06-20 20:04
Электронная коммерция или сокращенно электронная торговля относится к предпринимательской деятельности, такой как продажа и покупка товаров и услуг, осуществляемых по электронной системе Интернет и электронной сети.История электронной коммерции сводится к 1970 году, когда электронный обмен данными был осуществлен впервые, а также были введены средства электронного перевода. С тех пор быстрый рост электронной торговли проник почти во все аспекты бизнеса, такие как управление, цепочками поставок, обработка транзакций, интернет-маркетинг и управление запасами.Как и любой другой бизнес, электронная коммерция характеризуется присутствием некоторых недостатков и преимуществ. Давайте взглянем на некоторые из этих важных преимуществ и недостатков электронной торговли.</span>
#include <iostream>
using namespace std;
int main() {
setlocale(LC_ALL, "Russian");
int dm;
double cm;
for (dm=10;dm<=22;dm++){
cm=dm*25.4/10;
cout<<dm<<" дюймов = "<<cm<<" сантиметров"<<endl;
};
return 0;
}
