// PascalABC.NET 3.3, сборка 1573 от 04.11.2017 // Внимание! Если программа не работает, обновите версию!
begin var st:='balloon duster tooth loot cooperation'; // не вводим // var st:=ReadlnString; // если хочется вводить var s:=st.ToWords; // массив из слов s[i] s.Println; // показать исходный массив слов // собственно решение var i:=s.Select(w->w.Length).ToArray.IndexMin; // индекс короткого слова s[i]:=s[i].Replace('oo',''); s.Println; // результат end.
Большинство компьютерных экспертов сходятся в том, что история развития принтера началась почти двести лет назад, когда в 1822 году англичанин Бэббидж начал разработку «большой разностной машины», которая должна была делать расчёты и тут же печатать в виде таблиц их результаты. К 1834 году машина так и не была создана, хотя на её разработку ушло 23 тысячи фунтов, однако, работа над ней была прервана, а 1842 году проект Бэббиджа перестал финансироваться британским правительством. Большая разностная машина умерла, так и не родившись.Любопытно, что через 150 лет сотрудники Лондонского научного музея по сохранившимся чертежам смогли воссоздать этот уникальный прибор, являющийся фактически, механической вычислительной машиной. В него входили более 8 тысяч деталей, а весил данный «калькулятор» 5 тонн. Но самое главное – машина на самом деле могла решать простейшие уравнения и печатать на бумаге результаты! Поэтому Бэббиджа с определённой натяжкой можно назвать тем человеком, кто изобрел принтер.
1) подготовительный этап
2) планирование работы
3) поиск информации
4) результаты и вывод
5) защита проекта
6) оценка процесса и результатов работы