Хепл «Объекты алгоритмов. Математические выражения» 1. Как описывается целый тип данных?
2. Вычислите значения выражений:
5 mod 2=
40 div 6=
500 mod 10=
80 div 6=
23 mod 5=
37 div 10=
3. Найдите значение выражения A mod (B div C + 5) – 10
при А=100, В=20, С=3
4. Вычислите значения выражений:
Trunk (10.123)=
Round (10.123)=
5. Переведите с алгоритмического языка в математические выражения:
Sqrt (a+b)-Sqrt (a-b)
6. Переведите математические выражения на алгоритмический язык:
var
a:array[1..10]of integer;
b:array[1..10]of integer;
max,i,c,k:integer;
beginfor i:=1 to 10 do
a[i]:=random(20)-10;
for i:=1 to 10 do
if abs(a[i])>abs(max) then begin
max:=a[i];
c:=i;
end;
for i:=1 to 10 do
if (a[i]=max)and(i<>c) then begin
b[i]:=i;
k:=k+1;
end;
writeln('максимальный элемент по модулю=(',max,') номер этого элемента=(',c,')');
write('номера таких же элементов: ');
for i:=1 to 10 do
if b[i]>0 thenwrite(b[i],' ');
writeln('их кол-во:(',k,')');
writeln;
for i:=1 to 10 do
write(a[i],' ')
end.