Здесь Вы можете найти ответы на многие вопросы или задать свой вопрос!
1.
var n: integer; begin cls; for n: =1 to 10 do begin write('n=',sqr(n)+5,' '); end; end.
решить на паскале?
32 кбит/с*16 с=524288 бит=65536 кбайт.
вес 1 страницы=8*48=384 бит.48
кол-во стр=524288/384=1365 страниц
var kol,a,b,c: longint;
begin
read(a,b,c);
if a< 0 then kol: =kol+1;
if b< 0 then kol: =kol+1;
if c< 0 then kol: =kol+1;
write(kol);
end.
4)¬a λ b λ ¬c: только это логическое выражение будет равносильно начальному
Популярные вопросы