При копировании кода формат испортился. Код должен выглядеть как на картинке
var r, l: real; //Радиус и длина окружности соответственно top, bottom: real; //Внешний и внутренний радиус кольца ex_num: word;begin write('Введите номер задания: '); read(ex_num); if ex_num = 1 then begin write('Введите радиус: '); read(r); writeln('Длина окружности: ', 2 * pi * r); writeln('Площать круга данного радиуса: ', pi * r * r); end else if ex_num = 2 then begin writeln('Введите длину окружности: '); read(l); write('Площадь круга: ', pi * sqr(l / 2 * pi)); end else begin write('Введите внешний радиус кольца: '); read(top); write('Введите внутренний радиус кольца: '); read(bottom); write('Площадь кольца: ', pi * top * top - pi * bottom * bottom); end;end.
В информатике используются различные подходы к измерению информации:
Содержательный подход к измерению информации. Сообщение – информативный поток, который в процессе передачи информации поступает к приемнику. Сообщение несет информацию для человека, если содержащиеся в нем сведения являются для него новыми и понятными Информация - знания человека ? сообщение должно быть информативно. Если сообщение не информативно, то количество информации с точки зрения человека = 0. (Пример: вузовский учебник по высшей математике содержит знания, но они не доступны 1-класснику)
Алфавитный подход к измерению информации не связывает кол-во информации с содержанием сообщения. Алфавитный подход - объективный подход к измерению информации. Он удобен при использовании технических средств работы с информацией, т.к. не зависит от содержания сообщения. Кол-во информации зависит от объема текста и мощности алфавита. Ограничений на max мощность алфавита нет, но есть достаточный алфавит мощностью 256 символов. Этот алфавит используется для представления текстов в компьютере. Поскольку 256=28, то 1символ несет в тексте 8 бит информации.
Вероятностный подход к измерению информации. Все события происходят с различной вероятностью, но зависимость между вероятностью событий и количеством информации, полученной при совершении того или иного события можно выразить формулой которую в 1948 году предложил Шеннон.
var r, l: real; //Радиус и длина окружности соответственно top, bottom: real; //Внешний и внутренний радиус кольца ex_num: word;begin write('Введите номер задания: '); read(ex_num); if ex_num = 1 then begin write('Введите радиус: '); read(r); writeln('Длина окружности: ', 2 * pi * r); writeln('Площать круга данного радиуса: ', pi * r * r); end else if ex_num = 2 then begin writeln('Введите длину окружности: '); read(l); write('Площадь круга: ', pi * sqr(l / 2 * pi)); end else begin write('Введите внешний радиус кольца: '); read(top); write('Введите внутренний радиус кольца: '); read(bottom); write('Площадь кольца: ', pi * top * top - pi * bottom * bottom); end;end.