Ребенок-Кукла-Форма
Событие-текст-отношение с другими объектами
Явление природы-макет-вид
Процесс создания объекта-план действий-алгоритм
Здание-рисунок-элементный состав
<span>Вот так, мы это делали.</span>
//PascalAbc.net V 3.3
const n = 30;
var a:array[1..n] of integer;
n3,n4,n5,i:integer;
begin
for i:=1 to n do begin
a[i]:=random(3,5);
if a[i]=3 then inc(n3);
if a[i]=4 then inc(n4);
if a[i]=5 then inc(n5);
end;
writeln('3 - ',n3);
writeln('4 - ',n4);
writeln('5 - ',n5);
print(a);
end.
var
x1, x2 : integer;
begin
write('введите координаты точек x1 и x2: ');
readln(x1, x2);
writeln('расстояние между точками равно: ', abs(x2-x1));
end.
3, оттенок чуть-чуть другой.