ПОТОГИТЕ СРЧ ХАЛЯВНЫЕ ОТВЕТЫ БУДУТ В С У ПОЛЬЗОВАТЕЛЯ О Во Сколько единиц в двоичной записи шестнадцатеричного числа 3FE ?
Какое из неравенств выполняется для чисел А = 6507 , В = 4759 и С = 23245 ?
Чему равна сумма чисел A = 20345 и B = 3278 ? ответ запиши в двоичной системе счисления.
A+B =
Десятичное число 63 в некоторой системе счисления записывается как 120 .
Определи основание системы счисления.
В какой системе счисления выполнено сложение 124x+242x=421x ?
Выбери из списка основание этой системы счисления:
Более удобный, компактный и требующий меньше памяти код, чем у предыдущего ответа.
Пояснение:
1) вводятся два числа и забиваются в значения a и b соответственно.
2)при команды else производится отбор. Если а больше b, то идет запись, если нет, то идет другое else, где если a меньше b, то идет запись их. В конечном случае, если не выполняется ни то, ни то, то просто выводится, что они равны, т.к больше нет никаких вариантов.
Код:
Program school6;
var a,b:real;
begin
write ('Введите первое число:');
readln(a);
write ('Введите второе число:');
readln(b);
if a>b then
write ('Первое число больше второго на ', a-b)
Else
If a<b then
write ('Второе число больше первого на ', b-a)
Else Write('числа равны');
end.
1)
var i, sum: integer;
begin
sum:= 0;
for i:= 1 to 100 do sum:= sum + i;
write(sum);
end.
2)
var i, sum: integer;
begin
sum:= 0;
for i:= 11 to 50 do sum:= sum + i * sqr(i);
write(sum);
end.
3)
var i, sum: integer;
begin
sum:= 0;
for i:= 10 to 99 do if i mod 2 = 1 then sum:= sum + i;
write(sum);
end.
4)
var i, sum: integer;
begin
sum:= 0;
for i:= 50 to 90 do sum:= sum + sqr(i);
write(sum);
end.
5)
var i, sum: integer;
begin
sum:= 0;
for i:= 10 to 99 do if i mod 2 = 0 then sum:= sum + i;
write(sum);
end.