pascal
Объяснение:
program photo;
var
a, b: integer;
begin
WriteLn('Введите размер фотографии в см: ');
Write('длина: '); ReadLn(a);
Write('ширина: '); ReadLn(b);
WriteLn('Размер отсканированного изображения разрешением 600 пиксел/дюйм');
WriteLn('при 24-битном кодировании будет равен:');
WriteLn((a / 2.54 * 600) * (b / 2.54 * 600) * 24:12:2, ' бит');
WriteLn((a / 2.54 * 600) * (b / 2.54 * 600) * 24 / 8:12:2, ' байт');
WriteLn((a / 2.54 * 600) * (b / 2.54 * 600) * 24 / 8 / 1024:12:2, ' Кбайт');
WriteLn((a / 2.54 * 600) * (b / 2.54 * 600) * 24 / 8 / 1024 / 1024:12:2, ' Мбайт');
end.
1. Образовательные:
сформировать представления о назначении и принципах построения локальных компьютерных сетей;
сформировать знания о составе и основах функционирования локальных компьютерных сетей;
2. Развивающие:
развить познавательные и творческие учащихся;
развить образное мышление;
развивать готовность учащихся к информационно-учебной деятельности, применять инструментальные средства и средства информационных технологий в любом предмете для реализации учебных целей и саморазвития.
3. Воспитательные:
воспитывать трудолюбие, ответственность за результаты своего труда:
воспитывать культуру делового общения при совместной работе в группе;
воспитывать доброжелательность среди учащихся, нацеленность на результативность обучения.
