Если ввести в окно поиска какое нибудь слово, то браузер найдет его значение или информацию о запросе
Вот) Тут используется формула
и, как я понимаю, всё таки
, а не
var
x, res: real;
i, n: integer;
begin
writeln('Enter n, x:');
readln(n, x);
res := 0;
for i := 1 to n do
res := res + cos(exp(i * ln(x)));
writeln(res);
end.
=======
var
A: real;
i: integer;
begin
writeln('Enter A:');
readln(A);
i := 1;
while 1 / (2 * i) >= A do
i := i + 1;
writeln('a_', i, ' = ', 1 / (2 * i));
end.
1. 0,25 Кбайт=256 байт = 2048 бит
2. Каждый символ - 8 бит
3. 2048/8=256 символов
Ваш алгорим не оптимален, совершенно незачем делать "<em>for k:=100 to 1000000000 do"</em>, т.к. по условию необходимо проверить лишь трехзначные числа.
uses crt;
var a,b,k:integer;
begin
for k:=100 to 999 do
if k mod 20 =0
then begin
a:= k div 20;
b:= k div 10;
if ((a mod 10) + (a div 10)) = ((k mod 10) + (b mod 10) + (a div 10)) then writeln(k);
end;
end.
#include <iostream>
using namespace std;
int main() {
int x, n;
int res = 0;
cout << "Введите два числа: ";
cin >> x >> n;
for (int i = 1; i <= x; i++)
res += n;
cout << endl << x << " * " << n << " = " << res << endl;
return 0;
}