На Паскале
var a: array [1..5] of integer;
i: integer;
p, m: integer;
begin
for i:=1 to 5 do begin
readln(a[i]);
If a[i] < 0 then
m:= m+a[i]
else
p:=p+a[i];
end;
writeln(p/abs(m));
end.
var
a,x:integer;
i,s:integer;
begin
write('Введите число ');
readln( a );
x:=a;
s:=0;
while ( x<>0 ) do begin
s := s + (x mod 10);
x := x div 10;
end;
writeln( 'Сумма цифр числа ',a,' = ', s );
if (s mod 2 <>0 ) then
writeln('Верно')
else writeln('Неверно');
end.
Var a,b,c:real;
begin
read(a, b, c);
writeln(max(a,max(b,c)));
end.
или
var a,b,c:real;
begin
read(a, b, c<span>);
</span>if (a>=b) and (a>=c) then write(a)
else if (b>=a) and(b>=c) then write(b) else write(c);
end.
1) 1200 * 1200 dpi означает, что в квадрате размером 1 дюйм на 1 дюйм сканируется такое количество точек
2) в 1 дюйме = 2,54 см, значит в 10 см содержится 3,94 дюйма (10/2,54 = 3,94)
3) 3,94* 1200 = 4728 пикселей по ширине и по высоте экрана
4) 4728 * 4728 = 22353984 точек в цветном изображении 10 на 10 см
5) 22353984 * 24 = 536495616 бит - информационный объем изображения
Переведем в большие единицы измерения:
536495616 бит / 8 = 67061952 байт / 1024 = 65490,2 Кбайт / 1024 = 64 Мбайта
Ответ: полученный файл будет 64 Мбайта.
В 16 системе счисления каждая цифра несет 4 бита информации, тк
N = 2^i
16 = 2^i
i = 4