Каков минимальный объем видеопамять, необходимый для хранения графического изображения, занимающего область экрана 512х512 точек, где каждая точка имеет одна из 256 цветов?
Ближе к началу координат та из точек, чей квадрат расстояния до начала координат x^2 + y^2 меньше. У меня описан алгоритм что_ближе, который принимает аргументами 4 вещественных числа - координаты точек и выводит сообщение о том, какая из точек ближе.
У меня для примера рассматриваются точки (1, 1) и (2, 0) - первая точка ближе, (4, 8) и (1, 7) - вторая точка ближе, и (3, 4) и (0, 5) - точки на одинаковом расстоянии.
Вы можете задавать значения и с клавиатуры, и записывать их сразу в текст программы, в зависимости от того, что требуется.
алг что_ближе(вещ x1, y1, x2, y2) нач вещ d d := (x1*x1 + y1*y1) - (x2*x2 + y2*y2) выбор при d < 0: вывод "Первая точка ближе", нс при d > 0: вывод "Вторая точка ближе", нс иначе вывод "Точки на одинаковом расстоянии", нс все кон
Пусть ученик неуспевающий, если сумма его отметок меньше 2+2+3+3=10.
var count_losers, sum, current_sum, mark, i, j, n: integer;
begin read(n); count_losers := 0; for i := 1 to n do begin current_sum := 0; for j := 1 to 4 do begin read(mark); current_sum := current_sum + mark; end; if current_sum < 10 then inc(count_losers); sum := sum + current_sum; end; writeln('Неуспевающих учеников: ', count_losers); writeln('Средняя сумма четырёх отметок: ', sum / n); writeln('Средняя отметка: ', sum / 4 / n); end.
Пример ввода: 4 2 2 2 5 2 2 5 2 2 5 2 2 3 2 2 2
Пример вывода: Неуспевающих учеников: 1 Средняя сумма четырёх отметок: 10.5 Средняя отметка: 2.625
512*512*256=67108864 бит
67108864 / 8=8388608 байт
8388608/1024=8192 Килобайт
8192/1024= 8 Мегабайт