Алг Число
нач
цел n,a,b,c,d
ввод n
a:=mod(n,10);
n:=div(n,10);
b:=mod(n,10);
n:=div(n,10);
c:=mod(n,10);
n:=div(n,10);
d:=n;
вывод "Сумма цифр числа = ", a+b+c+d;
вывод " Произведение цифр числа = ",a*b*c*d;
кон
procedure pr_max(a,b,c:integer; var max:integer);
begin
if a>b then max:=a else max:=b;
if c>max then max:=c;
end;
var m:integer;
begin
pr_max(15,47,24,m);
writeln(m);
end.
Результат:
47
A:1,2,3,4,5;B:-1,-2,-3,-4,-5;C:1,2,3,4,5.
program d;
var a, b, c: integer;
begin
for c:= 1 to 5 do
begin
a:= a + 1;
b:= b - 1;
writeln (a:3,' ',b:3,' ',c:3);
end;
end.
1) Вес файла = 640 * 480 * 24 = 7372800 бит ( 8 * 3 = 24 бит)
Времени понадобится = 7372800/28800 = 256 секунд
2) x МБайт = 1024x КБайт
10ГБайт = 10 * 1024 * 1024 =
КБайт
Откуда
3) Это аналог двоичной системы счисления, где
A = 0, Б = 1.
На первом позиции стоит число со значением 0.
Значит на 7 месте будет число 7 - 1 = 6 = 110 = ББА