Выполняемое действие-Применяемая команда 1.После загрузки ОС Windows указать,
какие кнопки расположены на
Панели задач.-Применяемая команда
2.Перечислить, сколько и какие
объекты (паки, документы, ярлыки,
прикладные программы)
расположены на рабочем столе.-Применяемая команда
3.Открыть Главное меню. Указать
команду.-Применяемая команда
4.Перечислить пункты обязательного
раздела Главного меню.-Применяемая команда
5.Перечислить пункты произвольного
раздела Главного меню.-Применяемая команда
6.Открыть Контекстное меню. Указать-Применяемая команда
команду.
7.Перечислить пункты Контекстного
меню, не выделяя объекты.-Применяемая команда
8.Перечислить пункты Контекстного
меню, выделив какой-либо из
объектов. Указать, какой объект
выделили.-Применяемая команда

program xxx;

    var i, n : integer;

                      s : real;

                    a : array [1..20] of real;

begin

  writeln('введите размерность массива n=');

  readln(n);

  write('введите элементы массива а: ');

  for i: =1 to n do

        readln(a[i]);

  writeln('исходный массив а: ');

  for i: =1 to n do

        writeln(a[i]);

  s: =0;

  for i: =1 to n do

      if a[i] mod 2 = 0 then s: =s+a[i];

  writeln('сумма четных элементов =', s);

  readln

end.

сначала взять кирпич-взять цемент- налить уемент- положить на цемент кирпич. и т.к

чтение из файла обычно пишется readln(f,s) где f имя файловой переменной так что скорей всего нужно вставить

readln(input,s); s: =s+' '; f: =0; for i: = 1 to length(s) do beginif s[i]< > ' ' then r: =r+s[i]; if s[i]=' ' then begin k: =k+1; d[k]: =r; r: =''; end; end; readln(input,n); for i: = 1 to n do beginreadln(input,sait[i]); readln(input,tegs[i]); readln(input,pop[i]);

соответственно и запись в файл write(f,s)

думаю так1) налить в кувшин 3 л, перелить в емкость,где будет 7 л

2) еще раз налить туда 3 л

3) налить 3 л воды налить в кувшин для 8 л, потом еще раз для 8 литров и еще раз(3 раза) на третьем разе останется 1 л,этот л и доливаем в кувшин с 7 л