Первый действующий автоматический компьютер был сделан в 1944 году в Гарвардском университете профессором Говардом Эйкеном и группой инженеров из корпорации «Интернешнл Бизнес Машинз». Они назвали свое устройство «Гарвард Ай Би Эм—1». Это была первая машина, которая могла выполнять длинный список вычислительных операций. Она могла работать с 23-разрядными числами — сложить два таких числа за 0,3 секунды и умножить их за 4 секунды. В машине были использованы электрические и механические, а не электронные детали. Как только стали использоваться электронные детали, скорость работы компьютера резко возросла.
Наверное, можно и своими словами объяснить. Ну ты сам(а) логический порассуждай чем различие и сходство между древним и современным компьютеров. Ну например, У современных компьютеров мощный процессор, болшая память, множество программ, игр, и все это в одном небольшом системном блоке. Это очень компактно! А у старых компьютеров память еле-еле достигали 1 гб. А так же скорость, ну это просто ужас.Компьютер оперировал 72 числами, состоящими из 23 десятичных разрядов, затрачивая по 3 секунды на операции сложения и вычитания. Умножение выполнялось в течение 6 секунд, деление — 15,3 секунды, на операции вычисления логарифмов и выполнение тригонометрических функций требовалось больше минуты.
Program Tlg; var s:string; i,n:integer; p:real; begin Writeln('Введите текст телеграммы, разделяя слова ровно одним пробелом'); Readln(s); Write('Укажите стоимость слова в рублях: '); Read(p); n:=1; for i:=1 to length(s) do if s[i]=' ' then Inc(n); Writeln('Стоимость телеграммы, руб: ',n*p:0:2) end.
Тестовое решение: Введите текст телеграммы, разделяя слова ровно одним пробелом Грузите апельсины бочками братья Карамазовы Укажите стоимость слова в рублях: 3.78 Стоимость телеграммы, руб: 18.90
program RevStr; var s,s1:string; i,j,n:integer; begin Write('Исходная строка: '); Readln(s); s:=' '+s; n:=length(s); i:=n; j:=n; s1:=''; while i>0 do begin j:=i; while (s[j]=' ') and (j>1) do Dec(j); { удалили пробелы } i:=j; while (s[j]<>' ') and (j>1) do Dec(j); { пробежали по непробелам } if j>0 then s1:=s1+' '+Copy(s, j+1, i-j); i:=j-1 end; s1:=Copy(s1,2,length(s1)-1); Writeln(s1) end.
Тестовое решение: Исходная строка: А роза упала на лапу Азора Азора лапу на упала роза А
Первый действующий автоматический компьютер был сделан в 1944 году в Гарвардском университете профессором Говардом Эйкеном и группой инженеров из корпорации «Интернешнл Бизнес Машинз». Они назвали свое устройство «Гарвард Ай Би Эм—1». Это была первая машина, которая могла выполнять длинный список вычислительных операций. Она могла работать с 23-разрядными числами — сложить два таких числа за 0,3 секунды и умножить их за 4 секунды. В машине были использованы электрические и механические, а не электронные детали. Как только стали использоваться электронные детали, скорость работы компьютера резко возросла.