Выведите таблицу размером n \times n n×n, заполненную числами от 1 1 до n^2 n 2
по спирали, выходящей из левого верхнего угла и закрученной по часовой стрелке, как показано в примере (здесь n=5 n=5):

​

Відповідь:

Вирус является программой, поэтому объекты, не содержащие программ и не подлежащие преобразованию в программы, заражены вирусом быть не могут. Например, графические файлы форматов . BMP, . PCX, . GIF, . WMF и др. содержат только описание рисунков, поэтому как бы их вирус не изменял, при просмотре или ином использовании графического файла можно получить искаженный рисунок или сообщение о неправильном формате файла, но вирус при этом запущен быть не может. Иными словами, не содержащие программ объекты вирус может только испортить, но не заразить. К числу таких объектов относятся текстовые файлы(кроме командных файлов и текстов программ), документы простых редакторов документов типа Лексикона или Multi- Edit, информационные файлы без данных и т.д.

Пояснення:

1.

program ll1;

var i, a: integer;

begin

i:=2;

a:=2;

writeln(a);

while i<=10 do

begin

a:=a*a;

i:=i+1;

writeln(a);

end;

end.

2.

program ll1;

var a, i, sum: integer;

ssum: real;

begin

i:=1;

sum:=0;

while i<=10 do

begin

i:=i+1;

readln(a);

sum:=sum+a;

end;

ssum:=sum/i;

if ssum<1000 then

writeln('Низкая цена');

end.

3.

program ll1;

var A: array[1..7] of integer;

i, pr: integer;

begin

Randomize;

for i:=1 to 7 do

begin

A[i]:=random(10)-5;

write(A[i], ' ');

if A[i] = 0 then A[i]:=1;

pr:=pr * A[i];

end;

writeln(pr);

end.

4.

program ll1;

begin

writeln(1*2*3*4*5*6 + 3*3*3*3*3*3);

end.