Var a,b,c: integer;begin
a:=1;
while a<100 do
begin
c:=c+a;
a:=a+1;
end;
writeln(c);
<span>end.</span>
Формулы
1) a+a+a \ 3
2)нужно знать ср. арифм. и 1 число
При использовании алфавита из 32 символов на 1 символ необходимо использовать log(2)32 = 5 бит.
6400 байт = 6400*8 бит
Количество строк = 6400*8/(5*32*5) = 64
#include <iostream>
using namespace std;
int main()
{
int i; // счетчик цикла
int sum = 0; // сумма чисел
for (i = 29; i <= 1160; i+29) // задаем начальное значение, конечное и задаем шаг цикла 29.
{
sum = sum + i;
}
cout << "Сумма чисел = " << sum << endl;
return 0;
}