с cd-r информацию нельзя удалить, можно только добавить. с cd-rw- можно удалить.... Подробнее

если хотим получить универсальное решение   1 сначала составляем таблицу или запись или как угодно назовите - набор связаных между собой данных определенных типов (зависит от... Подробнее

ответ: часть схемы пере информацию-плата.... Подробнее

1) program m; uses crt; var i,a,b,c,min: integer; beginclrscr; readln(a,b,c); if a< min then min: =a; if b< min then min: =b; if c< min then min: =c; writeln('  &nbs... Подробнее

1)m(hcl)=50*0.292=14.6г 2)n(hcl)=m/m=14.6/36.5-=0.4моль 3)n(оксида металла)=0,4/2=0,2 4)m(оксида металла)= 8/0,2=40 5)раз металл двухвалентен, то значит формула - meo, следовательн... Подробнее

самым главным считается объем... Подробнее

1.найти разность показаний счетчика на конец месяца и на начало месяца. 2.умножить на цену одного квт/часа... Подробнее

решение на... Подробнее

var a,res: integer; begin writeln('введите число'); readln(a); res: =sqr(a); writeln('квадрат числа,'a', равен,'res','); readln; end.... Подробнее

var a: array [1..100] of integer; i,n: integer; s: string; begin   randomize;   for i : =1 to 100 do   begin       a[i]: = random(1000)+1000;... Подробнее

основной текст в египте писали чёрной краской ,чтобы выделить начало строки или фразы писали красным .(но выделяли редко -писчий материал был дорогим).... Подробнее

эти числа заданы в двоичной системе счисления, переведем их в десятичную и решим : 111100% =  60% девочек 1100 = 12 мальчиков 12 мальчиков составляют 40% учащихся в классе с... Подробнее

вот так понятней буде)) ну и более правильно, для   var a,b,c,d: integer; beginwriteln('введите 1 число'); read(a); writeln('введите 2 число'); read (b); writeln('введите 3... Подробнее

режим разметки страницы,режим структуры,режим чтения.режим веб документа-... Подробнее

пломп лпмб_лпмплпмб й об лпмбц_лпмплпмб (около кола _колокола и на колах _колокола)  ... Подробнее

1.найти разность показаний счетчика на конец месяца и на начало месяца. 2.умножить на цену одного квт/часа... Подробнее

№1 program z1; var n: integer; begin write ('введите число n: '); readln(n); if (n mod 2 = 0) and (n div 100 < 1) and (n > 9) then write('данное число является четным... Подробнее

program xxx;       var d, x1, x2, y1,y2 : real; begin   write('введите координаты 1 точки: ');   readln(x1, y1);   write('введите координаты... Подробнее

var i: integer; begin   for i: =1 to 1000 do       if i mod 2 = 1 then writeln(i*i*i); end.... Подробнее

var s : string; symb : char; i : longint; begin  readln(s);   readln(symb);   if pos(symb,s)=0 then writeln('в этом слове нет этого символа')  else beg... Подробнее