N = 2^i ; 64 = 2^6 ; 6 бит - один символ
M = K * i ; K = 10*32*64 = 20480 ; M = 20480*6=122880 бит/8 = 15360 байт
Решение на<em> Pascal</em>:
var
a: integer;
begin
writeln('Введите число:');
readln(a);
if (a mod 5 = 0) then writeln('Число является кратным 5.') else writeln('Число не является кратным 5.')
<span>end.</span>
Создать цикл, умножающий каждый элемент массива на -1
for ( int i = 0; i < n; i++ )
{
b [ i ] = b [ i ] * (-1);
}
n - размер массива
Uses crt;
const N=6;
var a, b, c, d, e,sum,f,j,i:real;
begin
repeat
writeln('Введите 6 чисел');
readln(a,b,c,d,e,f);
sum:=(a+b+c+d+e+f);
j:=sum/N;
writeln('Среднее арифметическое чисел = ',j);
writeln('Хотите повторить программу еще раз? Если да - нажмите 1 ,если нет - нажмите 2');
readln(i);
until i=2;
end.