50, если применять способ хранения «бит на пиксель».
#include <stdio.h>
#include <stdlib.h>
#include <time.h>
int main()
{
int i,j,n,sum,a[30][30];
printf("n=");
srand(time(NULL));
scanf("%d",&n);
printf("Matrix:\n");
sum = 0;
for (i = 1; i <= n; i++)
{
for (j = 1; j<=n; j++)
{
a[i][j]=1+rand()%9;
printf("%d ",a[i][j]);
}
printf("\n");
}
printf("\n");
for (i=2;i<=n-1;i++)
{
for(j=1;j<=2*i-1;j++)
if(i!=j)
sum+=a[i*2-j][j];
a[i][i]=sum;
sum=0;
}
printf("Output matrix:\n");
for (i = 1; i <= n; i++)
{
for (j = 1; j <= n; j++)
printf("%d ", a[i][j]);
printf("\n");
}
return 0;
}
Var A, I, O: Integer;
Begin
ReadLn(A);
For I:=100 to 999 do Begin
If I div 100 = A Then
O:=O+1;
if (I div 10)-(I div 100) = A then
O:=O+1;
If I - ((I div 10)*10) = A Then
O:=O+1;
End;
WriteLn(O);
End.
Я не понял скажи какой вапрос?
S:=1; - переменной s присваивается начальное значение 1
<span>for i := 10 to 99 do - начало цикла с параметром, i - параметр цикла, 10 - начальное значение параметра, 99 - конечное значение параметра. Т.е. цикл будет выполняться 90 раз, параметр i будет принимать последовательно значения 10, 11, 12, ..., 99.
</span>if (i mod 13 = 0) and (i mod 2 <> 0) then - условный оператор. В условии используется операция mod - определение остатка от целочисленного деления. (i mod 13 = 0) - это условие будет выполняться для чисел, которые делятся на 13 без остатка; (i mod 2 <> 0) - это условие будет выполняться для чисел, которые делятся на 2 с остатком (это нечетные числа). Таким образом, условие <span>(i mod 13 = 0) and (i mod 2 <> 0) будет иметь значение true для нечетных чисел, которые делятся на 13 без остатка (это 13, 39, 65, 91).
</span>Программа в целом вычисляет произведение нечетных чисел, которые <span>делятся на 13 без остатка.
(В программе есть ошибка. Тип переменной s должен быть integer.)</span>