число пикселей на странице: 800 * 600 = 480000
у нас 2 страницы: 2 * 480000 = 960000 - число пикселей на двух страницах
объем видеопамяти: 32 * 960000 = 30720000 бит = 3840000 байт = 3750 Кбайт
Использовать Робот
алг
нач
нц пока не слева свободно и не сверху свободно
если не слева свободно и не сверху свободно то
закрасить
вниз
все
кц
нц пока не слева свободно и снизу свободно
вниз
кц
нц
пока не слева свободно и не снизу свободно
закрасить
вправо
кц
нц
пока не снизу свободно и справа свободно
вправо
кц
нц
пока не справа свободно и не снизу свободно
закрасить
вверх
кц
нц
пока не справа свободно и сверху свободно
вверх
кц
закрасить
нц пока не сверху свободно и слева свободно
влево
кц
кон
Var a,b: integer;
c: real;
begin
write('a=');
readln(a);
write('b=');
readln(b);
c:=(a+b)/2;
write('среднее арифметическое: ',c);
end.
Правильно: 543(6)=5*6(в квадрате)+4*6+3= 180+24+3=207,
56(7)=5*7+6=41
неправильно:91(3), так как нельзя использовать в записи 9. (есть только 0, 1, 2),
23(2), так как нельзя использовать 2. (есть только 0, 1).
Program fgg;
var
i, n: Integer;
s: Real;
begin
Write('Введите n: ');
ReadLn(n);
for i := 1 to n do
s := s + 1 / i;
WriteLn('s=', s);
end.