с решением задачи Задача №3
В комнате 15×10 устроена раздевалка. Вдоль левой стены есть свободный проход. К правой примыкают перегородки длиной по 9 клеток. На этих перегородках с верхней стороны в каждой клетке закреплены вешалки. Роботу поручили расстелить коврики для обуви во всех клетках с вешалками. Напиши программу, которая позволит ему обойти все перегородки со стороны вешалок и покрасить соответствующие клетки. Пусть он начнет вверху свободного прохода и закончит внизу.

Дано: a=10 см b=10 см k_1=1200×1200 dpi i=24 bit i  -  ? решение: i=k*i 1 дюйм = 2,54 см a=b=10 см=10/2,54=3,94 дюйм k=k_1ab=1200×1200  dpi*3,94 дюйм*3,94 дюйм=22353984 i=22353984*24  бит=536495616 бит  ≈ 64 мбайт ответ:   i≈64 мбайт

написано для pascal abc

 

 

uses graphabc; begin window.title : = 'apple'; var y,y0,x,t: integer; brush.color : = clgreen; y0: =70; x: =70; lockdrawing; for t : = 0 to 8 do begin y: =y0+5*t*t; window.clear(clwhite); circle(x,y,50); redraw; sleep(100); end; end.

2 единицы в двоичной записи числа 1025

10000000001

var a: array[1..10, 1..10] of integer; i, j, s: integer;

begin s : = 0; for i : = 1 to 10 do begin for j : = 1 to 10 do begin a[i, j] : = random(20) + 1; write(a[i, j]: 3); if (j = 2) and (a[i, j] > 10) then s : = s + a[i, j]; end; writeln; end; writeln('сумма элементов 2го столбца больших 10 равна', s); end.