Все категории

4 года назад

Составить 5 примеров на mod и div

Знания

Информатика

1 ответ:

Viacheslav19794 года назад

0 0

17 mod 3 =2
17 div 3 = 5
23 mod 10=3
23 div 10 =2
9 mod 2=1
9 div 2=4
33 mod 4=1
33 div 4= 8
29 mod 7 =1
29 div 7 =4
A div B - частное от деления A на B с остатком
A mod B - остаток от деления A на B с остатком!

Читайте также

Помогите даю 100 баллов!

ninok1234

Public Function UserFunction(items As Variant) As Integer

Dim result As Integer

For Each Item In items

If Item < 0 Then

result = result + (Item * Item)

End If

Next Item

UserFunction = result

End Function

Этот код вставляется как новый модуль, Alt+F11, Insert -> Module. После нужно сохранить книгу с поддержкой макросов, это обязательно.

Пример использования ниже:

0 0

3 года назад

Массив А[1 12] заполните случайными числами в диапазоне от одного до 20 определить сумму шести первых элементов массива

Игуана

var

i: integer;

mas: array[1..12] of byte;

begin

randomize;

for i:=1 to 12 do

mas[i]:= random(20) + 1;

writeln('Сумма = ', mas[1]+mas[2]+mas[3]+mas[4]+mas[5]+mas[6]);

end.

0 0

2 года назад

Выберите наибольшее из чисел: АА.16, 251.8, 10011101.2. В ответ запишите выбранное число в десятичной системе счисления. Помогит

Юрсаныч

Ответ:

AA.16 наиболее из чисел

0 0

4 года назад

ПОМОГИИИИИТЕ!!!!! ЛОГИЧЕСКИЕ ВЫРАЖЕНИЕ!!!!!

Вероника Киселева [33]

$\displaystyle (a+b\overline a)a\overline b=(a+b)a\overline b=a\overline b+0=a\overline b=a\land\lnot b$

0 0

4 года назад

Проверить является ли введенное слово перевертышем? Написать программу в Паскале!

Настя Алимова [50]

Var i,n,k:integer;
s:string;
  begin readln(s);
n:=length(s);
  for i:=1 to n div 2 do
  if s[i]=s[n-i+1]then
k:=k+1;
if k=n div 2 then
  writeln('y')
else
writeln('n');
<span>end.</span>

0 0

1 год назад