Расстояние между двумя точками на плоскости вычисляется по формуле: d = √((х2 – х1)^2 + (у2 – у1)^2). Тогда, d = √((8– 6)^2 + (10 – 5)^2) = √((2)^2 + (5)^2) = √29
const xn=100; const xm=100;var x: array [1..xn, 1..xm] of integer; n, m,i,j,r: integer;
begin write('Введите n');Read(n);write('Введите m');Read(m);for i := 1 to n do beginfor j := 1 to m do beginif ((i = 1) or (i = n)or (j = m) or (j = 1)) thenwrite(0:3,' ')else beginif (((i mod 2) = 0)or((j mod 2) = 0))thenwrite((i*i+j*j):3,' ')else beginr:= Round(Random()*15 - 5);write((r):3,' ');end;end;end; Writeln; end;end.
Путь к файлу (Например C:\file.txt)
Инструкция по настройке бытового прибора.
Инструкция на автомате для продажи кофе
Инструкция по устранению неполадок в работе устройства.