<em>// PascalABC.NET 3.2, сборка 1383 от 09.02.2017</em>
<em>// Внимание! Если программа не работает, обновите версию!</em>
begin
var m,n:integer;
Write('Введите n и m: '); Read(n,m);
Writeln('Сумма n+...+m равна ',Range(n,m).Sum);
Writeln('Произведение n*...*m равно ',
Range(n,m).Aggregate(BigInteger(1),(i,j)->i*j))
end.
<u>Пример</u>
Введите n и m: 6 27
Сумма n+...+m равна 363
Произведение n*...*m равно 90740578753486268006400000
1.
126 * 1024 = 129024 байт
64 * 80 = 5120 символов на странице
129024/5120 = ~25
Гейб Ньюэлл собственник и владелец “Valve” пользователь- любой человек
Примерно так:
min=a[0];
for (int i=0, i<4, i++)
if(a[i]<min)
min=a[i];
здесь ты в переменную min записываешь минимальное значение. лучше первое значение из массива присваивать(или нулевое, как у меня).
проходишь циклом по массиву и сравниваешь значение min со значениями из масива. если какое-то окажется меньше, ты его записываешь в переменную min
если некоторые переменные окажутся одинаковыми, то ничего не произойдет :)
например
7 1 1 5
запишется первая единица. и все
Для кодирования одного из 256 символов требуется log(2)256 = 8 бит = 1 байт.
1 Тбайт = 1024 Гбайт = 1024*1024 Мбайт = 1024*1024*1024 Кбайт = 1024*1024*1024*1024 байт;
Один год это 60*24*365 минут;
Количество символов, набираемых за год 24 учениками: 24*160*60*24*365.
Искомое число лет = 1024*1024*1024*1024 / (24*160*60*24*365) ≈ 545
