Определи расстояние на плоскости между двумя точками с заданными координатами M1(x1,y1)и M2(x2,y2) . ответ введи целым числом.
Если координаты точек: x1=2;y1=6x2=9;y2=12 .
ответ округли до целых.
ответ: d=

Операційні системи бувають двох видів: текстові та графічні.
Текстові - це переважно інтерфейси, які базуються на використанні командного рядка (введення набору команд, за до яких користувач може здійснити ту чи іншу дію чи отримати певну інформацію). Основним пристроєм керування в даних ОС є клавіатура. Прикладом текстових ОС є DOS.
Графічні - це інтерфейси сучасних операційних систем, які складаються з вікон, меню, та інших графічних елементів, що взаємодіють між собою. Основними пристроями керування в даних ОС є як клавіатура так і миша. Прикладом графічних ОС є Windows, Linux, OS X тощо.

КОД в Turbo Pascal

USES CRT;
VAR A:array[1..5,1..5] of integer;   
           i,j,min,s:integer;
BEGIN
CLRSCR;
Randomize; 
{заполняем массив случайными числами от 0 до 10}
for i:=1 to 5 do   
   for j:=1 to 5 do     
   A[i,j]:=random(10); 

{Выводим массив на экран} 
  for i:=1 to 5 do   
    begin   
      for j:=1 to 5 do     
         Write(A[i,j]:2, '   ');   
    Writeln;   
    end;

min:=A[1,1]; {Присваиваем минимальному значению первый элемент массива}   
 
{Ищем минимальный элемент в массиве} 
for i:=1 to 5 do     
   for j:=1 to 5 do     
       if A[i,j]<min then min:=A[i,j];

Writeln('Минимальный элемент в данном массиве = ',min);

{Обнуляем счетчик} 
s:=0;

{Считаем сколько минимальных элементов в каждой строке и выводим на экран}

for i:=1 to 5 do   
   begin     
      for j:=1 to 5 do       
         if A[i,j]=min then s:=s+1;     
      Writeln('В ',i,' строке минимальный элемент встечается ',s,' раз');                  s:=0;   
end;

READLN;
END.