var
i:integer;
begin
i:=10;
while i<21 do
begin
writeln(i*i*i, ', ');
i:=i+1;
end;
end.
0000.0001.0010.0011.0100.0101,0110,0111,1000,1001,1010,1011,1100,1101,1110,1111. Всього 16 паролей.
Терминатор(начало)->данные(ввод N)->функция(нахождение суммы всех отр. чисел)->терминатор(конец)
<span>условие?условие_верно:условие_ложно </span>
<span>если надо более подробно, то вместо функции: </span>
<span>условие(число отрицательное?добавить в сумму->данные(сложить_отр._число): пропустить)->данные(N_декремент)->условие(если N>0?повторить_всю_эту_муть_что_я_написал_в_этой_прошлой строке_и_позапрошлой строках:терм.(конец))</span>
Билл Геец - общепринятое но ответ сильно зависит от трактовки понятия "компьютер". Первый цифровой компьютер создал немецкий инженер Конрад Цузе в 1938 году