2. Краткий тезисный конспект (в виде текста, схемы, таблицы и других форм). Для хранения и передачи информации необходимо ее учитывать. Чтобы знать, сколько информации сохранено или перенесено, ее нужно уметь измерить. Например, для создания текста используем буквы, для записи музыки – ноты, для написания чисел – цифры. Компьютер – электронная машина. Ее «мозг» напрямую не воспринимает текст, музыку или цифры. Он принимает только электронные сигналы. Поэтому информацию на компьютер можно передать только в виде электрических сигналов. Для записи информации в компьютер все данные (буквы или цифры, аудио или видео) в компьютере должны быть переведены в язык сигналов. Если нет сигнала, то принято обозначать – 0, если есть – 1. Все виды информации, хранящейся в памяти компьютера: текст, числа, изображения, программы, управляющие работой компьютера, представляются в виде последовательности двоичных цифр. На английском языке («binary digit») сокращенно означает двоичный символ. Бит является наименьшей единицей измерения информации.Бит может принимать только одно из двух значений: 0 или 1. Кодирование, хранение и передача информации с этих двух символов облегчает работу вычислительных устройств. Удобство использования двоичных чисел привело к широкому применению их в вычислительной технике.
Объем информационного сообщения – это длина сообщения, в которой учитывается количество символов, используемых для записи данного сообщения. Объем информационного сообщения измеряется в битах, байтах и других единицах измерения информации.
1 бит = «0» или «1» символ
1 байт = 8 бит
1 килобайт (Кб) = 1024 байта
1 мегабайт (Мб) = 1024 Кб
1 гигабайт (Гб) = 1024 Мб
1 терабайт (Тб) = 1024 Гб
В настоящее время, в связи с увеличением объема обрабатываемой информации, используются единицы измерения большего объема:
1 петабайт (Пб) = 1024 Тб
1 эксабайт (Эб) = 1024 Пб
1 зеттабайт = 1024 Эб
program Week;
var day:integer; week:array[1..7] of string;
begin
week[7]:='Воскресенье';
week[6]:='Суббота';
week[5]:='Пятница';
week[4]:='Четверг';
week[3]:='Среда';
week[2]:='Вторник';
week[1]:='Понедельник';
write('введите номер дня недели ');
readln(day);
writeln'**************************************');
case day of
'1'..'7': writeln('Сегодня - ',week[day]);
else writeln('Вы ввели неправильный номер дня недели')
end;
writeln('**************************************');
end.
Добавил блок-схему - только там исправь а то я ошибся:
Все блоки вывода должны быть параллелограммами (такие как ввод), а не прямоугольниками. Sorry :)
1)
var a:string;
s,i:integer;
begin
read(a);
s:=0;
for i:=1 to length(a) do
if a[i]='o' then s:=s+1;
Writeln(s);
end.
2)
var A:array[1..1000] of integer;
N,i:integer;
s:real;
begin
Read(N);
s:=0;
for i:=1 to N do
read(A[i]);
for i:=1 to N do
s:=s+a[i];
s:=s/N;
writeln(s:3:3);
end.
3)
var a:string;
s:integer;
begin
read(a);
s:=length(a);
if a[1]=a[s] then writeln('Da') else writeln('Net');
end.
4)
var a,b:integer;
f:text;
begin
assign(f,'in.txt');
reset(f);
read(f,a,b);
Writeln(a+b);
Writeln(a-b);
Writeln((a+b)/2);
close(f);
end.
Вроде все корректно, проверь
В 4 задаче, название файла in.txt можешь поменять на любое другое
По всем вопросам пиши в ЛС