с Информатикой в Excel 1) – оформить таблицу по образцу, внести данные по своему усмотрению (в таблице показан доход от продажи шести продавцов фирмы за первый квартал года), – ввести формулу нахождения суммы продаж для первого по списку продавца, затем скопировать эту формулу на нужное количество ячеек вниз,
– ввести формулу в колонку "Комиссионные", если известно, что продавцы получают комиссионное вознаграждение в размере 8% от всей суммы продаж,
– ввести формулу в колонку "Премия", если известно, что продавцы получают премию в размере 2%, если их сумма продаж свыше 1000 р.; в колонке "Премия" нужно будет использовать логическую функцию если, например, если(G10>1000;G10*2%;0), – ввести формулу нахождения суммы комиссионных и премии в последнюю колонку, – вычислить общую сумму продаж, среднее, максимальное и минимальное значения, использовав статистические функции, например, сумм(E10:E15), срзнач(E10:E15), макс(E10:E15), мин(E10:E15), – произвести сортировку в таблице так, чтобы продавец с максимальной суммой продаж был указан в списке первым.
2) Построить по данным таблицы график зависимости у от х.
Var a, b: integer; var c: string; begin writeln('Введите 1 число.'); readln(a); writeln('Введите 2 число.'); readln(b); writeln('Знак операции.'); readln(c); if c='*' then writeln(a*b); if c='/' then writeln(a/b); if c='-' then writeln(a-b); if c='+' then writeln(a+b); end. 2 ЗАДАЧА var a, b: real; begin writeln('Зарабаток Пети:'); readln(a); writeln('Зарабаток Петрова:'); readln(b); if a>b then writeln('Петя заработал больше Петрова.') else if a=b then writeln('Петров и Петя заработали одинаково.') else writeln('Петров заработал больше Пети.'); writeln('Среднее: ', (a+b)/2); end.
Не самый рациональный метод решения, но как говорится чем смог тем
var a,b,c,x,kc,kn,k1,k2:integer; begin kc:=1; kn:=1; k1:=0; k2:=0; a:=0; b:=0; writeln('Введите число x'); read(x); while x>0 do begin c:=x mod 10; if c mod 2=0 then begin inc(k1); a:=a+c*kc; kc:=kc*10; end; if c mod 2<>0 then begin inc(k2); b:=b+c*kn; kn:=kn*10; end; x:=x div 10; end; if k1>k2 then writeln('Четных больше нечетных') else if k1=k2 then writeln('Количество четных = количеству нечетных') else writeln('Четных меньше нечетных'); writeln(a,' ', b); end.
0,0(0 оценок)
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
