Var p,a:integer;
begin
writeln('Введи сторону');
readln(a);
p:=4*a;
writeln(p);
end.
----------
var s,a:integer;
begin
writeln('Введи сторону');
readln(a);
s:=a*2;
writeln(s);
end.
На манипуляторе нажимается кнопка, на которую реагирует компьютер и производит определенное действие.
Переведём байты в килобайты: 484582/1024=473,2246 кБ.
Объём дискеты тоже переведём в килобайты: 1,44*1024=1474,56.
Разделив объём дискеты на размер одного файла получим количество файлов: 1474,56/473,2246=3,12.
Ответ: 3 файла.
Встечаемся в полдень около реки там будет укрытье (лагерь)
7 Кбайт=7168 байт=57344 бит
K-количество пикселей
K=64*128=8192
V=K*i,где i-это глубина цвета в битах
i=V/K=57344/8192=7 бит-это приходится на один пиксель
N=2^i, где N-количество возможных цветов в палитре
N=2^7=128 цветов.
Ответ: 128