Программа ищет и выводит все трехбуквенные слова, содержащие русские и/или латинские буквы в обоих регистрах. Слова могут разделяться любым количеством любых символов, кроме символа подчеркивания.
// PascalABC.NET 3.2, сборка 1417 от 28.03.2017 // Внимание! Если программа не работает, обновите версию!
begin var s:=ReadlnString('Вводите:'); var m:=s.Matches('\b\w{3}\b'); if m.Count>0 then m.Println else Writeln('Нет трехбуквенных слов') end.
Пример: Вводите: Как найти все слова, где букв - три? Как все где три
1-ое поколение: 1946 г. создание машины ЭНИАК на электронных лампах. Эти ЭВМ были громоздкими сооружениями и занимали большую территорию. Для ввода программ и данных применялись перфоленты и перфокарты. Не было монитора, клавиатуры и мышки. Использовались эти машины для инженерных и научных расчетов.
2-ое поколение: 60-е годы. ЭВМ построены на транзисторах. Машины стали компактнее, надежнее, менее энергоемкими. Возросло быстродействие и объем внутренней памяти. Большое развитие получили устройства внешней (магнитной) памяти: магнитные барабаны, накопители на магнитных лентах(кассеты). стали развиваться языки программирования высокого уровня: ФОРТРАН, АЛГОЛ, КОБОЛ. были изобретены интегральные схемы.
3-е поколение: 70-е годы. ЭВМ построены на интегральных микросхемах (ИС). В Советском Союзе в 70-х годах начался выпуск машин серии ЕС ЭВМ (Единая система ЭВМ) по образцу IBM 360/370. Скорость работы достигла уже нескольких миллионов операций в секунду. На машинах третьего поколения появился новый тип внешних запоминающих устройств – магнитные диски. Созданы большие интегральные схемы (БИС).
4-ое поколение: Начало создаваться с 1971 г. с изобретением микропроцессора (МП). Создано на основе больших интегральных схем (БИС). Наиболее яркие представители четвертого поколения ЭВМ - персональные компьютеры (ПК). Персональной называется универсальная однопользовательская микроЭВМ. Связь с пользователем осуществлялась посредством цветного графического дисплея с использованием языков высокого уровня.
#include <math.h>
using namespace std;
int main ()
{
float x,y,z;
cout << "x*z^y: ";
cin >> x >> z >> y;
cout << x << '*' << z << '^' << y << '=' << x*pow(z,y) << endl;
system ("PAUSE");
return 0;
}