Записать на языке паскаль следующие выражения. y=14х(в квадрате) -5х(в кубе) + 11х-17. y=5x(в квадрате)-10х+2.

👇

Увидеть ответ

Ответ:

csczzz

06.07.2020

y=14*x*x-5*x*x*x+11*x -17

y=5*x*x-10*x+2

4,6(7 оценок)

Открыть все ответы

Ответ:

adamadam

06.07.2020

Смотри картинку

Объяснение:

Крестик - начало слова, стрелка - конец.

Абак - счётные доски для вычислений в Древней Греции, Древнем Риме, Древнем Китае и т.д.

Арифмометр - настольная или портативная механическая вычислительная машина.

Перфокарта - носитель информации. Тонкий картон с отверстиями или без них в определённых местах.

Транзистор - полупроводниковое устройство, которое используется для усиления, генерации и преобразования электрических сигналов. Транзисторы заменили вакуумные лампы в большинстве электронных устройств, свершив революцию в создании интегральных схем и компьютеров.

ЭНИАК – первая электронная вычислительная машина.

Бэббидж Чарлз - изобретатель первой аналитической вычислительной машины.

Лавлейс Ада - написала первые программы для аналитической вычислительной машины Беббиджа.

Лейбниц - предложил двоичную систему счисления, автор первой механической счётной машины производившей сложение, вычитание, умножение и деление чисел.

Возняк Стив - один из основателей компании Apple. Разработал первый массовый домашний компьютер и первый массовый персональный компьютер.

Холлерит Герман - создатель электрической статистической табулирующей системы (оборудования для работы с перфокартами).

Непер Джон - изобретатель логарифмов, для их вычисления он предложил устройство под названием «палочки Непера».

Шиккард Вильгельм - придумал «Считающие часы», первый арифмометр, умевший выполнять четыре арифметических действия.

Паскаль Блез - автор первой механической счётной машины, выполнявшей сложение и вычитание чисел. (Паскаль - один из наиболее известных языков программирования.)

Лебедева Сергей - под его руководством была создана МЭСМ (малая электронная счётная машина).

4,4(55 оценок)

Ответ:

SofiaBlack17

06.07.2020

// PascalABC.NET 3.2, сборка 1417 от 28.03.2017
// Внимание! Если программа не работает, обновите версию!

function Res(a:integer;op:char;b:integer):integer;
begin
case op of
'+':Result:=a+b;
'-':Result:=a-b;
'*':Result:=a*b;
'/':Result:=a div b
end
end;

begin
var s:=ReadlnString('Вводите:');
var p:=s.Matches('(((\-)?\d+)|[\+\-\*\/])').ToArray;
if p.Count<>5 then Writeln('Ошибка!')
else begin
    var op1:=p[1].Value[1];
    var op2:=p[3].Value[1];
    var a:=p[0].Value.ToInteger;
    var b:=p[2].Value.ToInteger;
    var c:=p[4].Value.ToInteger;
    if (op1 in ['+','-']) and (op2 in ['*','/']) then
      Writeln('='+Res(Res(b,op2,c),op1,a))
    else Writeln('='+Res(Res(a,op1,b),op2,c))
    end
end.

Примеры
Вводите: -4--3--2
=1
Вводите: 12*3+45
=81
Вводите: 45+12*3
=81
Вводите: -26/13--5
=3

4,4(64 оценок)

Это интересно:

Стиль-и-уход-за-собой

15.12.2021

Как подчеркнуть вырез декольте: 5 советов от стилистов...

Кулинария-и-гостеприимство

03.05.2020

Как приготовить итальянскую заправку с яблочным уксусом...

Транспорт

26.01.2020

Как смазать велосипедную втулку: простые советы от эксперта...

Искусство-и-развлечения