10. Как можно представить целое положительное число в позиционной системе счисления? 11. Приведите пример позиционной системы счисления.
12. Опишите правила записи чисел в десятичной системе счисления:
а) какие символы образуют алфавит десятичной системы счисления?
б) что является основанием десятичной системы счисления?
в) как изменяется вес символа в записи числа в зависимости от занимаемой позиции?
13. Какие числа можно использовать в качестве основания системы счисления?
14. Какие системы счисления применяются в компьютере для представления информации?
15. Охарактеризуйте двоичную систему счисления: алфавит, основание системы счисления, запись числа.
16. Почему двоичная система счисления используется в информатике?
var
i: Integer;
l: Single;
counter: Integer;
begin
counter := 0;
for i := 0 to 14 do begin
Read(l);
if l >= 165 then
counter := counter + 1 ;
end;
Writeln(counter);
end.
Второй вариант
const
cN: Integer = 15;
cMinSuitableLength: Single = 165;
var
arr: array [0..14] of Single;
i, counter: Integer;
begin
for i := 0 to Length(arr) - 1 do
Read(arr[i]);
counter := 0;
for i := 0 to Length(arr) - 1 do
if arr[i] >= cMinSuitableLength then
counter := counter + 1;
Writeln(counter);
end.
Объяснение:
var
i: Integer;
l: Single;
counter: Integer;
begin
counter := 0;
for i := 0 to 14 do begin
Read(l);
if l >= 165 then
counter := counter + 1 ;
end;
Writeln(counter);
end.
Второй вариант
const
cN: Integer = 15;
cMinSuitableLength: Single = 165;
var
arr: array [0..14] of Single;
i, counter: Integer;
begin
for i := 0 to Length(arr) - 1 do
Read(arr[i]);
counter := 0;
for i := 0 to Length(arr) - 1 do
if arr[i] >= cMinSuitableLength then
counter := counter + 1;
Writeln(counter);
end.
Объяснение: