Первый номер: 1-папка 2-файл 3-файл Второй номер: 1- текстовые редакторы 2- браузеры
Var
a:longint;
begin
readln(a);
writeln(a×a×a);
end;
i - 8 бит
K = 64*40*40
I - ?
I = K*i = 64*40*40*8 бит = 64*40*40*8/8 байт = 64*40*40 байт = 64*40*40/1024 Кбайт = 100 Кбайт
Program z1;
var a,b:integer;
begin
writeln('Введите 2 числа:');
readln(a,b);
if a<b then
write('Меньшее число:',a);
if b<a then
write('Меньшее число:',b);
end.
Ответ:
не, бред какой-то
звони оператору, выясняй с ним, почему минут нет