Var
a,b: integer;
begin
read(a);
b:=a mod 2;
a:= (a-b) div 2;
write ('Остаток от деления: ',b,' Целая часть: ',a);
end.
Beginvar a:=Readinteger('Введите число');write(a mod 100*10+a div 100);end.
<span> Система команд исполнителя – это все команды, которые исполнитель умеет выполнять. </span>
Начнём!
1 любой символ хоть пробел, хоть тире, хоть точка...не важно всегда равен 1 байт.
1 килобай(в вашем случае) всегда равен = 1024 байт!
=>1024x3.4=3481,6