Из Паскаля в Кумир var x,n: integer;
begin
write('n = ');
readln(n);
x := 1;
while sqr(x) < n do begin
write(sqr(x),' ');
x := x + 1
end;
readln
end.
Условия задачи:Выведите все точные кубы натуральных чисел и сумму кубов, не превосходящие данного числа
а) Что бы любой больной мог заполнять карту заявку, создал бы обще доступное имя входа, тобиш акаунт "гость" или "посетитель" и разрешил бы доступ только к одной таблице, "карта заявка". То есть что бы кроме карты заявки они ничего сделать больше не смогли.
б) для каждого сотрудника больницы сделал бы свой логин и пароль для доступа к базе данных, и разрешил бы им вход только в базы данных которые им нужны для работы.
г) Ну и если произойдёт какая либо утечка информации, то за счёт того что у каждого сотрудника свой персональный логин и пароль, мы сможем посмотреть логи. и свободно выявить, кто нарушил политику информационной безопасности, и наказать виновного.