ответ:
. в нужно вывести все составные числа из промежутка [2; n]. код программы:
program lab3;
var i,n,j,s,l: integer;
m: real;
begin
readln (n);
for i: =2 to n do
begin
s: =trunc (sqrt (i));
for l: =2 to s do
begin
m: = i mod l;
if m=0 then
write (' ',i);
end;
end;
end.
но проблема - как только s становится больше 2, составные числа начинают несколько раз повторятся, т.к., например 12 делится и на 2 и на 3. вопрос: как мне сделать выход из цикла после первого успешного деления?
var
i, n, j, s, l: integer;
m: real;
begin
readln(n);
for i : = 2 to n do
begin
s : = trunc(sqrt(i));
for l : = 2 to s do
begin
m : = i mod l;
if m = 0 then
begin
write(' ', i);
break;
1Найдите значение выражения 8F – 80 в шестнадцатеричной системе счисления. В ответе запишите вычисленное значение в десятичной системе счисления.
Решение.
Переведём число 8F16 из шестнадцатеричной в десятичную систему счисления:
8F16 = 14310.
Переведём число 8016 из шестнадцатеричной в десятичную систему счисления:
8016 = 12810.
Найдём разность: 143 − 128 = 15.
2
Найдите значение выражения 1116 + 118 : 112. ответ запишите в двоичной системе счисления.
Решение.
Переведем все числа в десятичную систему счисления, выполним действия и переведем результат в двоичную систему счисления:
1116 = 16 + 1 = 1710,
118 = 8 + 1 = 910,
112 = 2 + 1 = 310,
17 + 9 : 3 = 17 + 3 = 2010,
20 = 16 + 4 = 10100 и маленькая два вместе с ответом
3
Вычислите значение выражения B916 − 2718. В ответе запишите вычисленное значение в десятичной системе счисления.
Решение.
Переведём числа в десятичную систему счисления:
B916 = 18510
2718 = 18510
Найдём разность: 185 − 185 = 0.
ответ дай лучшего ответа
