1. Приведите примеры таблиц, с которыми вы сталкивались в жизни. 2. Всегда ли удобно табличное представление - id2119899820210610 от xasiyeva82p0c95p 10.06.2021 12:49

Question

Информатика: 1. Приведите примеры таблиц, с которыми вы сталкивались в жизни. 2. Всегда ли удобно табличное представление информации? 3. Какие преимущества обеспечивают табличные модели по сравнению со словесным описанием? 4. Любое ли словесное описание можно заменить таблицей? 5. Каких правил следует придерживаться при составлении таблиц? 6. Приведите пример таблицы ОС. 7. Приведите пример таблицы ООО.

xasiyeva82p0c95p · Accepted Answer

Var n,m,osn: integer;
function nmbdec(var n,osn: integer): integer;
var nmb,l,s,k: integer;
begin
nmb:=0; s:=0;
k:=n; l:=1;
while k>0 do
begin
s:=k mod 10;
k:=k div 10;
nmb:=nmb+l*s;
l:=l*osn;
end;
Result:=nmb;
end;
{ конец функции}
begin
write('число: ');
readln(n);
write('квадрат какого числа: ');
readln(m);
osn:=10;
while osn>=2 do
begin
osn:=osn-1;
if nmbdec(n,osn)=sqr(nmbdec(m,osn)) then
begin
writeln('основание системы = ',osn);
break;
end;
end;
end.

MOGZ ответил