Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
первым кому удалось расшифровать египетские иероглифы, был французкий ученый жан-франсуа шампольон (1790-1832). он составил полный список иероглифов и их гречиских эквивалентов создав тем самым основу для перевода всех египетских текстов.
program xxx;
var i, k : integer;
a : array [1..10] of real;
begin
write('введите элементы массива а: ');
for i: =1 to 10 do
readln(a[i]);
writeln('исходный массив а: ');
write(a[i]);
k: =0;
for i: =1 to 9 do
if a[i]< > a[10] then k: =k+1;
writeln('элементов отдичных от последнего -', k);
readln
end.
min і max нужно присвоить а[1].
(1010,01)16=1*16^3+0*16^2+1*16+0+0*16^(-1)+1*16^(-2)=4112,00390625
(f001)16= 15*16^3+1=61441
Популярные вопросы