var prod,i:integer;
begin
prod:=1;
for i:=10 to 99 do
if(i mod 15=0) then prod:=prod*i;
writeln(prod)
end.
<span>Командный пользовательский интерфейс требует более высокой
абстракции, профессионализма и подготовки. Графический интерфейс более
дружественный к оператору, большую часть работы позволяет перенести на плечи
компьютера. Как правило, основные ошибки допускает оператор, а не компьютер.
Вероятность ошибки возрастает по экспоненте с ростом количества манипуляций
оператора. Как правило, если оператор вынужден вводить с клавиатуры в два раза
больше команд, то вероятность ошибки возрастает не в 2 раза, а в 10 раз. Поэтому,
как заметил еще Стив Джобс, будущее за графическим интерфейсом, который открыл
новую эру в Макинтош. В современном мире эволюция интерфейса не остановилась.
Все больше роль в общении с компьютером берет на себя электроника. Компьютер
научился определять настроение оператора по улыбке, фотография автоматически фокусируется,
на нужном участке, вводятся голосовые команды, команды по сигналам нейронов,
температурные инфракрасные датчики... С 13 мая 1997 года, когда компьютер победил
Г.Каспарова – чемпиона по шахматам среди людей, человечество незаметно для себя
шагнуло в новую эпоху, которая по праву называется информационной. Будущее в
лидерстве и прогрессе эволюции уже не определяется однозначно и не принадлежит только
человеку, а переходит к своеобразному кентавру человеко-машинному комплексу.
Рутинные, громоздкие операции ложатся на плечи автоматики, а ответственность и
планирование берет на себя человек.
</span>
S:=1;
N:=1;
For i:=2 to n do s:=s+1/i; S: = 1+1/2 = 1,5