Задача 4. Определить объем растрового изображения размером 200 х 200 и 256 цветами.Решение: 200 х 200 х 8 бит = 320 000 бит / 8 бит / 1024 байт = 39,0625 Кбайт ≈ 39 КбайтОтвет: 39 Кбайт
Управляющий объект - Мышь Объект управления - экранные объекты
Управляющий объект - процессор Объект управления - данные
Program klubnika
<span>var a,b : integer; </span>
<span>begin </span>
<span>writeln('введите общее количество клубники'); </span>
<span>readln(a); </span>
<span>writeln('введите количество клубники, которое собрала Вера'); </span>
<span>readln(b); </span>
<span>if a-b > b then writeln('Валя собрала больше клубники') </span>
<span>else if a-b < b then writeln('Вера собрала больше клубники') </span>
<span>else writeln('клубники было собрано поровну');</span>
Var x,y: integer;
begin write('Введите два целых числа, разделяя их пробелом: ');
readln(x,y);
if x>y then
writeln('Сумма ',x,' и ',y,' равна ',x+y)
else
writeln('Произведение ',x,' и ',y,' равно ',x*y);
writeln('Задача решена');
<span>end.</span>