Компьютер моей мечты - такой, который обладает гигантской пропускной способностью в плане взаимодействия с пользователем. Лично я набираю этот текст на клавиатуре примерно на 1/20 от той скорости, с которой я бы его читал, а читаю этот текст я примерно на 1/3 от скорости моего мышления. Это крайне медленно. Прорывной компьютер должен быть способен на прямое считывание наших мыслей, никаких клавиатур, мышей и микрофонов. Естественно, у него должна быть нерушимая защита от взлома. И еще кое-что - на нем должна быть программа мощного ИИ для значительного усиления моих творческих, познавательных и коммуникативных способностей. Только, пожалуй, делать ИИ умнее меня не стоит, ибо могут проявиться некоторые "непредсказуемые последствия". Хоть сейчас все это и кажется фантастикой, но примерно через 40-50 лет и прямая связь с мозгом, и ИИ уровня человека (или чуть повыше) вполне могут стать обыденностью, как это сейчас и произошло с Айфонами и интернетом.
Воот. Мне определенно следует меньше читать Тима Урбана...
Var i,s,k:integer; begin i:=11; s:=0; k:=0; repeat s:=s+i; i:=i+1; k:=k+1; until i>20; write ('Cреднее арифметическое чисел ОТ 11 ДО 20 равно: ', s/k) end.
var n,m,i:integer; begin write('Введие вес мальчика: '); readln(n); write('Введите массу конфет (кг): '); readln(m); i:=0; while n+n-5<>m do begin i:=i+1; m:=m-1; end; writeln('Детям необходимо сьесть ',i,' кг конфет'); end.