50

разработать алгоритм определения отношения (принадлежит или не при-
надлежит) точки пространства, задаваемой координатами, шару с центром в
начале координат и радиусом 2 метра. представить блок-схему фоткой

Наша жизнь полна разных трудностей(знаю звучит абсурдно но не обессуть). Есть разные предметы по которым (в основном технологические) иногда требуется составление таблицы. Конечно для каждого кажется легче свой кому-то легче учить сплошным текстом, кому то легче таблицами или схемами. Но, по моему намного легче учить таблицами. Кроме того таблицы нужны не только для учёбы ,но и для работы например: тебе нужно написать отчёт по работе, и конечно будет намного легче для понятия если ты напишешь это в виде таблицы или схемы чем свободным текстом. Ещё например в жизни могут понадобятся таблицы для того чтобы составить решить задачу-вот для чего нужны таблицы.

Первое задание:

program cube;
    var a,s,v:real;
begin;
    write('Введите длину ребра куба: ');
    read(a);
    v:=power(a,3);
    s:=6*sqr(a);
    write('Площадь равна ',s,', а объём равен ',v,'.');
end.

Второе задание:

program par;
    var a,b,c,s,v:real;
begin;
    write('Введите стороны a,b,c: ');
    read(a,b,c);
    v:=a*b*c;
    s:=2*(a*b+b*c+a*c);
    write('Площадь равна ',s,', а объём равен ',v,'.');
end.

Третье и четвёртое задания:

program mult;
    var r,a,b,c:real;
begin;
    write('Введите три числа: ');
    read(a,b,c);
    r:=a*b*c;
    write('Произведение чисел равно ',r);
end.