Если сумма налога исчисляется в рублях и копейках, то налоговая служба округляет ее до ближайшего рубля ( до 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.