Var a,b,c:integer;
begin
writeln('Введите номер секунды');
readln(a);
b:=a div 3600;
c:=(a - 3600*b) div 60;
writeln(b,' ч ',c,' мин');
<span>end.</span>
Program n1;
var i,sum,a,k: integer;
begin
sum:=0;
k:=0;
for i:=1 to 20 do
begin
readln(a);
if a<0 then begin
sum:=sum+a;
k:=k+1;
end;
end;
write(sum/k);
end.
Ответ:
Объяснение:
1 дюйм = 2,54 см
15 см * 29 см ≈ 5,9 дюймов * 11,4 дюйма
Количество точек сканированного изображения = 600*600*5,9*11,4 = 24 213 600
Для хранения цвета одной точки ч/б изображения требуется 1 бит
Объем изображения = 24213600*1 бит = 24213600/8 байт = 3 026 700 байт = 3026700/1024 Кбайт ≈ 2956 Кбайт = 2956/1024 Мбайт ≈ 3 Мбайт
.