Числа в задаче даны в системе счисления с основанием 8:
24(8) = 2*8+4 = 20(10)
5(8) = 5(10)
12(8) = 8+2 = 10(10)
Формула имеет вид:
=ЕСЛИ(И(C2>=4;D2>=4;E2>=4;F2>=4);"да";"нет")
Const nx=20;var i,n,k,z,v,err,max:integer; t,s:string;a:array[1..nx] of integer;beginWrite('Введите число n');Read(n);Write('Введите числа');for i:=1 to n doRead(a[i]);foreach k in a do beginstr(k,s);t:= copy(s,1,1);val(t,v,err);if max < v then max:=v;end;writeln('max =',max);end.
1. trunc - округляет до предыдущего числа(trunc(29.9)= 29
round - округляет до близ лежащего числа
round(29.9)= 30
2.
/- просто делит
mod - деление с остатком
div - целочисленное деление.
Для удобства.
3. writeln(a);
4. отношение <>=
логические and, or, xor, not
5. Оператор присваивания := присваивает значение. А = служит приравниванию.
6. 1,2,4