3.5×1024=13684 байт
в він_125 1 символ =8біт або 1 байт
в юнікод 1 символ =16 біт або 2 байти
отже 13684 символи в він1251
і 13684/2=6 792 символів у юнікод
Program primer;
Var i,n,k,chislo:integer;
Begin
cls;
write(' skolko chisel budem vvodit ? '); readln(n);
write('chislo dlia poiska : '); read(k);
for i:=1 to n do
begin
readln(chislo);
if ((chislo mod 10 = k) or (chislo div 10 = k)) then
write('chislo ',chislo,' udov uslovie.. ')
else write('chislo ',chislo,' NE udov uslovie.. ');
writeln;
end;
readln;
End.
Program lol (input, output);
var a, b, I:integer;
begin
write ('Введите число а: ');
read (a);
write ('Ввндите число b: ');
read (b);
for I:=-10 to 0 do
begin
if a=I then
writeln ('Число а пренадлежит промежтку');
if b=I then
writeln ('Число b пренадлежит промежтку');
end;
end.
#include <iostream>
using namespace std;
int main()
{
int X[10];
long int sum = 0, prod = 1;
int k = 0;
for (int i = 0; i < 10; i++)
{
cout << "X[" << i << "] = ";
cin >> X[i];
if (X[i] < 0) sum += X[i];
if (X[i] != 0) prod *= X[i];
if (X[i] > 0) k++;
}
cout << "Сумма отрицательных = " << sum << endl;
cout << "Количество положительных = " << k << endl;
cout << "Произведение ненулевых = " << prod << endl;
//system("pause");
return 0;
}