1985 год выпуска, переводим и получаем:
110011000101
Ответ: 6 единиц
1) 20*8 = 160 бит
2) 0,5*1024*1024*8 = 4 194 304 бит
3) 25*1024*8 = 204 800 бит
4) 256*8 = 2048 бит
1) 128/1024 = 0,125 кб
2) 5*1024 = 5120 кб
по 5 заданию
Удовлетворяют 6 записей, кроме 4-й записи где Год посадки больше 1980 и и высота равна 3, а по условию должно быть меньше
Запись 5 хотя и год посадки больше 1980, но высота (3,2) больше 3, поэтому удовлетворяет условию.
Остальные записи удовлетворяют обоим условиям
1)
var
a:integer;
begin
writeln('Введите число: ');
readln(a);
Writeln(n div 10 - n mod 10)
end.
2)
var
a:real;
begin
writeln('Площадь в ар.: ');
Read(a);
Writeln('Кв,км: ',Trunc(a/10000))
end.