import java.util.Random;
import java.lang.Math;
import java.util.function.Function;
public class ot_1_do_100 {
public static void main(String[] args) {
Random r = new Random();
int s =0; int k;
int[] Array;
Array = new int[15];
for (k = 1; k <= 15; k++) {
int n = r.nextInt(15); //Диапозон рандома (от 0 до 14) + присвоение
s += n;
System.out.print(n + " "); //Вывод рандомных чисел
}
System.out.print(s); // Сумма всех чисел
}
}
Объяснение: Это язык Java
Все нули . потому что 00 . 001 и т.п. считаются за 1клб
<em>// PascalABC.NET 3.2, сборка 1379 от 21.01.2017</em>
begin
var t:=1000;
var k:integer;
repeat
k:=ReadInteger('->');
t-=k
until t<0;
Writeln('Всё...')
end.
<u>Пример</u>
-> 453
-> 216
-> 39
-> 64
-> 312
Всё...
<em>Решение для "древних паскалей"</em>
var
k,t:integer;
begin
t:=1000;
repeat
Write('->'); Read(k);
t:=t-k
until t<0;
Writeln('Всё...')
end.
В данной кодировке 40 символов (каждый пробел, тире и точка считаются за символ)
40 * 2 = 80 битов