Відповідь:
75497472 Біт
Пояснення:
1 МБайт = 1024 КБайт
1 КБайт = 1024 Байт
1 Байт = 8 Біт
9 МБ = 1024 * 1024 * 9 * 8 = 75497472 Біт
X = 5
y = -8
x (5) > 0
y (-8) не > 0
x (5) не < 0
y (8) > 0
<span><span>Program Str1;
VAR Words: STRING;
BEGIN
Words := 'microsoft';
Words[1] := UpCase (Words[1]);
WriteLn(Words); </span><span>{Выводится Microsoft'} </span><span>
END.
</span></span>
Кому как.
холодно, жарко -субъективные понятия.
Var
s:string;
c1,cn:char;
n:integer;
begin
Write('Введите натуральное число: '); Read(n);
Str(n,s);
c1:=s[1];
cn:=s[Length(s)];
if c1>cn then Writeln('Первая цифра больше последней')
else
if c1<cn then Writeln('Первая цифра меньше последней')
else Writeln('Первая и последняя цифры одинаковы')
end.
Тестовые решения
Введите натуральное число: 362336
Первая цифра меньше последней
Введите натуральное число: 7341423
Первая цифра больше последней
Введите натуральное число: 4624
Первая и последняя цифры одинаковы