Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
2^i = 24
i = 5
ответ. 5 лампочек.
2^i = 64
i = 6 бит потребуется на 1 символ
256 * 128 * 6 = 196608 бит памяти потребуется чтобы сохранить текст
196608 бит: 8 = 24576 байт : 1024 = 24 килобайт
ответ. 24 килобайт
program pr;
var mas: array[1..40] of integer;
i, sum: integer;
begin
randomize;
for i: =1 to 40 do mas[i]: =random(20);
for i: =1 to 40 do if mas[i]< =10 then sum: =sum+mas[i];
writeln ('сумма равна ', sum);
readln;
end.
программу проверил все работает
program xxx; var a, b, min : integer; begin write('введите число а=');
readln(a);
min: =10; while a < > 0 do begin b: = a mod 10; if b < min then min: =b; a: = a div 10 end; writeln('минимальная цифра = ', min); readlnend.
Популярные вопросы