Dim b(4,2)
for i=1 to 4 step 2
for j=1 to 2
b(i,j)=int(RND*10-8)
print b(i,j);
next j
print
next i
kol=0
for i=1 to 4 step 2
for j=1 to 2
if b(i,j) mod 3=0 then
kol=kol+1
end if
next j
next i
print kol
<em>// PascalABC.NET 3.3, сборка 1579 от 18.11.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var a:=ArrRandom(17,42,65); a.Println;
var k:=a.Where(t->t=50).Count; // кол-во элементов =50 - задание 2
Writeln('Кол-во элементов, равных 50: ',k);
a.Transform(t->t=50?0:t); a.Println // замена и вывод - задание 1
end.
<u>Пример</u>
65 45 55 47 50 44 45 43 50 51 44 43 56 45 65 51 65
Кол-во элементов, равных 50: 2
65 45 55 47 0 44 45 43 0 51 44 43 56 45 65 51 65
1. информация
2. этика
3. интернет
4. скачивание (но это не точно)
5. плагиат
6. безопасность
Организация двоичной системы исчисления такая же как и десятичной с одним лишь исключением: в десятичной 10 цифр (от 0 до 9), а в двоичной всего две цифры (0 и 1). При переходе из младшего разряда в соседний старший разряд в десятичной системе происходит умножение на 10, а в двоичной системе - умножение на 2. То есть например:
123 в десятичной = 1*100 + 2*10 + 3*1,
а в двоичной, например 101 = 1*(2*2) + 0*2 + 1*1 = 4+1=5, то есть
101(в двоичной) = 5 (в десятичной).
Для числа три,
3 = 2 + 1 = 1*2 + 1 = (11)(в двоичной).
В приложении файл изображения, там табличка соответствия первых натуральных чисел в десятичной и двоичной системе.
#include <stdio.h>
#include <iostream>
#include <malloc.h>
const int N = 10;
int main()
{
setlocale(LC_ALL, "RUS");
int i, j=0, n=0;
int array[N];
int *a;
puts("Исходный массив:");
for (i=0; i<N; i++) {
printf("Введите %d элемент:", i);
scanf("%d", &array[i]);
}
system("cls");
puts("Исходный массив:");
for (i=0; i<N; i++) {
printf("%d ", array[i]);
}
printf("\n");
for (i=0; i<N; i++)
if (array[i] == 0)
n++;
printf("Новый массив:\n");
a = (int *)malloc(n*sizeof(int));
for (i=0; i<N; i++)
if (array[i] == 0) {
a[j] = i;
printf("%d ", a[j]);
j++;
}
free(a);
printf("\n");
system("pause");
return 0;
}
<em><u>Тестовое решение:</u></em>
Исходный массив:
5 0 3 6 0 0 2 1 0 5
Новый массив:
1 4 5 8
Для продолжения нажмите любую клавишу . . .