1. напишите программу, где пользователь вводит любое целое положительное число. а программа суммирует все числа от 1 до введенного пользователем числа.

ответ:

program summa;

var

  n, s, i: integer;

begin

  write ('введите число: ');

  readln (n);

  s : = 0;

  for i : = 1 to n do

    s : = s + i;

  writeln ('сумма = ', s);

  readln;

end.

один символ - один байт, значит надо кол-во бит поделить на 8:

24576 /8 = 3072 символа

посадка дерева: 1.купить семя.

2.найти место для посадки.3.вскопать яму.4.посадить семя.5.закопать яму.переход улицы по светофору: 1.подойти к дороге (к светофору)2.посмотреть на цвет, который сейчас горит.3.дождаться нужного цвета.4.перейти дорогу.5.отправиться дальше.