Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
у семи нянек дитя без глаза.
28 символов * 2 = 56 байт
56 * 8 = 448 бит.
ответ. 448 бит.
program xxx;
var k, d, n : integer;
pr : boolean;
begin
writeln('введите число k=');
readln(k);
d: =2;
n: = k div 2;
pr: =false;
while (d< =n) and not(pr) do
if k mod d = o then pr: =true else d: =d+1;
if pr then writeln (k, '- число не простое') else writeln (k, '- число простое');
readln
end.
var
n,i,z: integer;
readln(n);
for i: =1 to n do if n mod i=0 then inc(z,i);
writeln(z);
s : = 0
for i : = 1 to n do
if i mod 2 = 1 then
s : = s - 1/2/n
else
s : = s + 1/2/n;
Популярные вопросы