решить кроссворд по информатике

2. Файл.

6. Архиватор.

8. Меню.

11. Программист.

12. Суперкомпьютеры.

14. Процессор.

По вертикали:

1. Папка.

3. Дружественный.

4. Диалоговые.

5. Программа.

7. Интерфейс.

9. Вирус.

10. Компьютер.

13. Контекстное.

Объяснение:

программа на паскале:

program xxx;

  var i, n, s : integer;

begin

  write ('введите n =' );

  readln (n);

  s: =0;

  for i: =1 to n do

    s: = s+ sqr(i+1);

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

  readln

end. 

program xxx;   var a,b, c : integer; begin

  writeln('введите 3 числа-');

  read(a,b,c);   if a> =0 then a: = sqr(a);

  if b> =0 then b: = sqr(b);

  if c> =0 then c: = sqr(c);

  writeln('ответ: ');

  write(a, b, c);

  readlnend.