очень надо по dev c++
1. Даны результаты переписи населения, которые хранятся в памяти ЭВМ. Напечатать фамилии, имена и подсчитать общее число жителей, родившихся после 1990 г.
2. По данным сведениям об учениках класса определить среднюю массу мальчиков. Кто из учеников класса весит больше всех?
5 3
+ 2 5
1 2 2
В младшем разряде 3+5 дают число, большее 5, а мы видим цифру 2, следовательно, получилось 12 и произошел перенос 1 в старший разряд, а 2 - это остаток. Но мы знаем, что 3+5 = 8, т.е. разница составила +4, тогда основание системы счисления на 4 меньше десяти, т.е. равно 6.
Проверим по старшему разряду.
5+2+1=8 (учли +1 переноса). Но это в десятичной системе, а в шестверичной на 4 больше, т.е. 12. Что мы и видим.
Вторая часть данных для решения не нужна. Совершенно.
ответ: шестеричная система счисления.
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.