Program n1;
var a: integer;
begin
write('введите натуральное число: ');
readln(a);
writeln('последня цифра: ',a mod 10);
end.
Var a,b,c,r:integer;begin writeln (' vvedite 3 chusla ');read(a,b,c);r:=a+b+c;write (r);end.
Задание 1 - ответ 2.
задание #3 - ответ 1.
1125 байт = 9000 бит, 1.1 Кб
1/16 Кб = 512 бит
12288 бит = 1.5 Кб