Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
используется язык pascal
program pr;
var
mas: array[1..7] of integer;
i: integer;
begin
writeln('вводим значения в массив');
for i: =1 to 7 do readln (mas[i]);
writeln('выводим значения из массива');
for i: =7 downto 1 do writeln(mas[i]);
readln;
end;
32 кбит/с*16 с=524288 бит=65536 кбайт.
вес 1 страницы=8*48=384 бит.48
кол-во стр=524288/384=1365 страниц
program mdd; uses crt; var a,b,c,d: longint; beginclrscr; readln(a,b,c,d); if (a> b) and (a> c) and (a> d) and (d< a) and (d< c) and (d< b) then writeln('правда')else writeln(''неправда); readkey; end.
егора-зеленая на 16гб
василий-желтую на 8гб
пети-краснаяна 4гб
Популярные вопросы