Все отдельно посчитал но без таблицы, сам(а) нарисуешь все посчитал
Ещё 19 рублей прибавь к итоговой сумме и к консервам ещё 250г и их цене
Ответ:
Объяснение:
var
num, num_work:integer;
a1, a2, a3, a4:integer;
begin
//num:=5225;
readln(num);
num_work:=num;
a1:=num_work div 1000;
num_work:=num_work mod 1000;
a2:=num_work div 100;
num_work:=num_work mod 100;
a3:=num_work div 10;
num_work:=num_work mod 10;
a4:=num_work;
if ((a1 = a4) and (a2 = a3)) then writeln('Да') else writeln('Нет');
end.
Реляционная база данных-это совокупность взаимосвязанных таблиц каждая из которых содержит информацию об объектах определённого типа.
Var x1,x2, dx, x:integer;
begin
readln(x1, x2, dx);
x:=x1;
write('x':3);
writeln('y':3);
repeat
write(x:3);
writeln(x*2:3);
x:=x+dx;
until x>x2;
end
В какую систему счисления? Будем считать, что в десятичную.
1) 151 (10) + 536 (16) = 151 + 1334 = 1485
2) 83 (16) + 11100110 (2) = 131 + 230 = 361
3) 251 (8) * 11 (10) = 169 * 11 = 1859
4) 11001101 (2) - 315 (8) = 205 - 205 = 0