На примере DelphiVarX:integer; Button_Click() BeginS:=0;x:=StrtoInt(Text1.text);x:=x mod 10; Label1.caption(InttoStr(x)); End; Результат: 5
Дано:
K=1024*528
i=32 бит
I-?
Решение:
I=K*i
I=1024*528*32 бит=17301504 бит=2,0625 Мбайт
Ответ: примерно 2 Мбайт
Max:=1; min:=1;
for k:=2 to n do begin
if a[k]>a[max] then max:=k;
if a[k] < a[min] then min:=k
end;
writeln ('max=', a[max]);
writeln ('min=', a[min]);
if max < min then writeln ('max раньше')
else writeln ('min раньше')
Примеры декларативного знания: монитор имеет квадратную форму, трава желтеет, вода мокрая, лед скользкий, ножи острые, перец острый.
Примеры процедурных знаний: что бы приготовить яичницу, нам нужно разбить яйца и жарить их в течении 5 минут.