Program ABC;
Uses CRT;
var
a,b:real;
c:char;
begin
ClrScr;
repeat
Writeln('la-la-la');
Write('Если хотите вычислить сумму, то нажмите С,');
Writeln(' произведение- D, операцию деления -E ');
Writeln('Для завершения работы нажмите Q');
c:=ReadKey;
case c of
'C','c':begin
Write('Сложение: введите слагаемые: '); Read(a,b);
Writeln('Сумма равна ',a+b);
Write('Для продолжения нажмите любую клавишу');
ReadKey;
ClrScr
end;
'D','d':begin
Write('Умножение: введите сомножители: '); Read(a,b);
Writeln('Произведение равно ',a*b);
Write('Для продолжения нажмите любую клавишу');
ReadKey;
ClrScr
end;
'E','e':begin
Write('Деление: введите делимое и делитель: '); Read(a,b);
Writeln('Частное равно ',a/b);
Write('Для продолжения нажмите любую клавишу');
ReadKey;
ClrScr
end;
'Q','q':;
else begin
Writeln(#13#10,'Error, please enter C, E or D',#13#10);
end
end;
until c in ['Q','q'];
Writeln('Ждем Вас снова!');
Readkey
end.
На 234 метро вырастет деревом через 2340 дней
Ответ:
var
a, b: Real;
c : Integer;
begin
Write ('A, B = ');
ReadLn (a, b);
c := 0;
if a > 0 then
Inc (c);
if b > 0 then
Inc (c);
WriteLn ('Количество положительных = ', c);
ReadLn;
end.
Смотри, для перевода из восьмеричной в десятичную надо это число представить в виде суммы произведения основания восьмеричной системы счисления на соответствующие цифры в разрядах восьмеричного числа:
К примеру, возьмем число 2357, нужно перевести в десятичную, в этом числе 4 цифры и 4 разряда (Разряды считаются, начиная с нулевого которому соответствует младший бит), в соответствии уже с известным правилом представим его в виде суммы степеней с основанием 8:
2357₈ = (2·8³)+(3·8²)+(5·8¹)+(7·8^0) = 2·512 + 3·64 + 5·8 + 7·1 = 1263₁₀
<em>Для вычислений "вручную" и решения примеров и контрольных заданий вам могут пригодиться таблицы степеней оснований изучаемых систем счисления (2, 8, 10, 16) </em>
Современные пользователи Интернета уже привыкли к символьным адресам сайтов, например videouroki.net или urokidoma.org. Действительно, такие адреса и набирать проще, и запоминаются они лучше. Технология доменных имён, благодаря которой работают эти символьные адреса, настолько срослась с Интернетом, что абсолютное большинство пользователей вообще не задумываются о её существовании.
Благодаря доменной системе имён компьютеры получают неповторимые символьные адреса. Домен – это группа компьютеров, которые объединены по некоторому признаку. Доменный адрес формируется из символьных имён доменов. Количество входящих в адрес доменов и число символов в их именах может быть разным. Доменный адрес представляет собой текстовую строку, составленную по особым правилам. Самое важное из этих правил – иерархия доменов.
Система адресов DNS имеет древовидную структуру. Вершины этой структуры называются доменами. Каждый домен может содержать множество «подчинённых» доменов.
