Интернет символ «@» появился несколько сотен лет назад в средневековых монастырях. Его использовали для обозначения латинского предлога «ad» (в современном английском — «at»), хотя некоторые исследователи утверждают, что «собаку» придумали итальянские монахи.
Как бы то ни было, это новшество вскоре переняли торговцы: одним из первых, кто использовал символ вне стен монастыря, был флорентийский купец Франческо Лапи, в одном из своих писем обозначивший «собакой» амфору — стандартную в те времена меру объёма, примерно равную 26-ти л.
Постепенно знак стал приобретать и другие значения, например, в португальском, испанском и французском языках до символа «@» обычно сокращают старинную испанскую меру веса под названием «arroba», равную 11,502 кг. Символ, похожий на «собаку», исследователи обнаружили в русских книгах XVI–XVII веков, в числе которых — Судебник Ивана Грозного, датируемый 1550-м годом, а к XIX-му веку знак уже получил широкое распространение в качестве обозначения единицы товара.
Рэй Томлинсон
В 1963-м году появилась кодировка стандарта ASCII, в числе 95-ти печатных знаков которой присутствовала и «собака», а в 1973-м году члены организации «Internet Engineering Taskforce» закрепили использование знака при разделении имени и домена — эту идею в 1971-м году выдвинул программист Рэй Томлинсон. Массовой «собака» стала в 1996-м году, когда появился сервис «Hotmail».
Кстати, «собакой» символ называют лишь русские и украинцы, в других языках этот знак известен под другими, порой достаточно необычными именами. Итальянцы говорят «chiocciola» («улитка»), в Греции его знают, как «παπακι» — «уточка», в Чехии и Словакии — «zavináč» («рулетик из сельди»), на Тайване используют понятие «小老鼠» (произносится как «сяо лао шу») — «мышка», в Израиле распространено название «שטרודל» — «штрудель», а в Казахстане знак именуют «айқұлақ» — «ухо Луны».
Интернет символ «@» появился несколько сотен лет назад в средневековых монастырях. Его использовали для обозначения латинского предлога «ad» (в современном английском — «at»), хотя некоторые исследователи утверждают, что «собаку» придумали итальянские монахи.
Как бы то ни было, это новшество вскоре переняли торговцы: одним из первых, кто использовал символ вне стен монастыря, был флорентийский купец Франческо Лапи, в одном из своих писем обозначивший «собакой» амфору — стандартную в те времена меру объёма, примерно равную 26-ти л.
Постепенно знак стал приобретать и другие значения, например, в португальском, испанском и французском языках до символа «@» обычно сокращают старинную испанскую меру веса под названием «arroba», равную 11,502 кг. Символ, похожий на «собаку», исследователи обнаружили в русских книгах XVI–XVII веков, в числе которых — Судебник Ивана Грозного, датируемый 1550-м годом, а к XIX-му веку знак уже получил широкое распространение в качестве обозначения единицы товара.
Рэй ТомлинсонВ 1963-м году появилась кодировка стандарта ASCII, в числе 95-ти печатных знаков которой присутствовала и «собака», а в 1973-м году члены организации «Internet Engineering Taskforce» закрепили использование знака при разделении имени и домена — эту идею в 1971-м году выдвинул программист Рэй Томлинсон. Массовой «собака» стала в 1996-м году, когда появился сервис «Hotmail».
Кстати, «собакой» символ называют лишь русские и украинцы, в других языках этот знак известен под другими, порой достаточно необычными именами. Итальянцы говорят «chiocciola» («улитка»), в Греции его знают, как «παπακι» — «уточка», в Чехии и Словакии — «zavináč» («рулетик из сельди»), на Тайване используют понятие «小老鼠» (произносится как «сяо лао шу») — «мышка», в Израиле распространено название «שטרודל» — «штрудель», а в Казахстане знак именуют «айқұлақ» — «ухо Луны».
1)
var
a: 100..999;
a1, a2, a3: 0..9; //а1 - сотни, а2 - десятки, а3 - единицы
begin
writeln('введите натуральное трехзначное число');
readln(a);
a1: = a div 100;
a2: = (a mod 100) div 10;
a3: = a mod 10;
writeln('полученное число: ', a1, a3, a2);
end.
2)
var
a: 100..999;
a1, a2, a3: 0..9;
begin
writeln('введите натуральное трехзначное число');
readln(a);
a1: = a div 100;
a2: = (a mod 100) div 10;
a3: = a mod 10;
writeln('полученное число: ', a2, a1, a3);
end.
3)
var
a: 100..999;
a1, a2, a3: 0..9;
begin
writeln('введите натуральное трехзначное число');
readln(a);
a1: = a div 100;
a2: = (a mod 100) div 10;
a3: = a mod 10;
writeln('полученное число: ', a3, a1, a2, a3);
end.
4)
var
a: 1000..9999;
a1, a2, a3, a4: 0..9;
begin
writeln('введите натуральное четырехзначное число');
readln(a);
a1: = a div 1000; //тысячи
a2: = (a mod 1000) div 100; //сотни
a3: = (a mod 100) div 10; //десятки
a4: = a mod 10; //единицы
writeln('полученное число: ', a4, a3, a2, a1);
end.
все остальное делается наподобие этого: просто в writeln меняешь местами цифры и все.