Если сумма налога исчисляется в рублях и копейках, то налоговая служба округляет ее до...

Постоянный пользователь нашего ресурса написал нам почту в 9:14 с просьбой предоставить развернутый ответ на его вопрос. Наши эксперты отнесли этот вопрос к разделу Разное. Для ответа был привлечен один из опытных специалистов, который занимается написанием студенческих работ.

Цитируем вопрос ваш вопрос

Если сумма налога исчисляется в рублях и копейках, то налоговая служба округляет ее до ближайшего рубля ( до 50 копеек- с недостатком , свыше 50 копеек (включая 50)- с избытком). Используйте компьютер, чтобы ввести точную сумму налога и вывести, сколько следует уплатить. 2) Запишите на языке Паскаль программу, которая вычисляет сумму кодов букв в слове БАЙТ. 3) Для заданного х вычислите у по формуле у= х3+2,5х2-х+1. При этом: а) операцию возведения в степень использовать запрещено; б) В одном операторе присваивания можно использовать не более одной арифметической операции (сложение, умножение, вычитание); в) В программе может быть использовано не более пяти операторов присваивания.

Разбор вопроса и ответ на него

Раздел 'Разное', к которому был отнесён этот вопрос является не простой рубрикой. Для подготовки ответа на вопросы из этой рубрики специалист должен обладать широкими познаниями в различных научных областях. Однако в нашей компании таковые имеются.

Вы спрашивали:

Если сумма налога исчисляется в рублях и копейках, то налоговая служба округляет ее до ближайшего рубля ( до 50 копеек- с недостатком , свыше 50 копеек (включая 50)- с избытком). Используйте компьютер, чтобы ввести точную сумму налога и вывести, сколько следует уплатить. 2) Запишите на языке Паскаль программу, которая вычисляет сумму кодов букв в слове БАЙТ. 3) Для заданного х вычислите у по формуле у= х3+2,5х2-х+1. При этом: а) операцию возведения в степень использовать запрещено; б) В одном операторе присваивания можно использовать не более одной арифметической операции (сложение, умножение, вычитание); в) В программе может быть использовано не более пяти операторов присваивания.

Конечно этот ответ может полностью не раскрыть тему вопроса, но мы постарались сделать его максимально полным. Предлагаем ознакомиться с мнением эксперта по этой теме:

N1
program task1;
var a:real;
begin
readln(a);
a:=Round(a);
writeln(a);
end.

N2

program task2;
var a,i:integer;s:string;
begin
s:=БАЙТ;
for I:=1 to s.Length do
a:=a+ord(s[i]);
writeln(a);
end.

К нам на почту приходит много вопросов. Мы стараемся отвечать на все. Однако вы должны понимать, что большая загруженность увеличивает время ответа. Сейчас среднее время ответа равно 16:15.