Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
И где выбрать ответы?
знаю, что арабские цифры придумали в древней индии, про древнеиндийские книги знаю только то, что их писали на языке санскрите, и если не ошибаюсь, то записи в древней индии делали на глине
var a: array[1..100] of integer;
s,i: integer ;
sr: real;
begin
{vvod massiva a}
for i: = 1 to 100 do
sr: =sr+a[i];
sr: = sr/100;
if a[i]> sr then
s: =s+1;
writeln(s);
end.
Популярные вопросы