1. каков был бы диапазон значений целых чисел, если бы для их хранения использовалась 16-разрядная ячейка?





2. запишите внутреннее представление следующих десятичных чисел, используя 8-разрядную ячейку:
а) 69 б) -123 в) -196 г) 78

а)
б)
в)
г)

3. запишите внутреннее представление следующих десятичных чисел, используя 16-разрядную ячейку:
а) -19095 б) 6994 в) -88007


а)
б)
в)

4. определите, каким десятичным числам соответствуют следующие двоичные коды 8-разрядного представления целых чисел:
а) 0110 б) 110 в) 101 г) 01101110

а)
б)
в)
г)

uses crt; var a[1..100] of integer; i,n,count: integer; begincount: =0; read(n); for i: =1 to n do read(a[i]); if a[i]> 0 then inc(count); write(count); end.

сад гад год код кот                        

var a,b,c: real; beginwriteln('введите данные о катетах'); readln(a,b); c: =1/2*a*b; writeln('площадь= ',c: 0: 2); readlnend.

  если паскаль абс, то предпоследнюю строку не обязательно.

begin   //начало программы

var nk, nt, ck ,ct, s: integer   // переменных типа действительные числа;

writeln('введите количество карандашей'); //вывести на экран надпись

readln(nk);   // запись ответа пользователя в переменную nk

writeln('введите количество тетрадей'); //вывод на экран надписи

readln(nt); // запись ответа пользователя

writeln('введите стоимость 1 карандаша');   // вывод на экран надписи

readln(ck); // запись ответа пользователя в переменную

writeln('введите стоимость 1 тетради');

readln(ct);

s: =(nk*ck)+(nt*ct); // вычисление стоимости покупки

writeln('стоимость покупки: ',s);   // вывод стоимости покупки на экран

end.   // конец программы

(ck-стоимость 1 карандаша, ct-стоимость 1 тетради, s-стоимость покупки)

(nk-количество карандашей, nt-количество тетрадей)